COMPUTE!s 


$3.00 
October 1986 Ee 
Issue 40, Vol. 4, No. 10 


02220 $4.25 Canada 


AZELTVE 


FOR COMMODORE PERSONAL COMPUTER USERS 


Directory 
Extension 


Enhance your 64 disk 
directories by adding 
directory descriptions and 
information—up to 55 
characters per filename. 


Also In This Issue: 


Sequential File 
Converter For 
SpeedScript 


Mastering 128 Sound 
And Music 


Software And Hardware 
Reviews 


And More 





The New Commodore 
Educational Software 
The Commodore 64 is a 
popular educational tool. in 
the classroom and at 
home. Here’s a guide to 
some of the companies 
with new Commodore 
“Il 
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Math Attack 
Math problems aren’t 
supposed to be this much 
fun. A 64 action game and 
educational tool for children 
of all learning levels. 














Ringside 
Karate 


Match your speed, timing, 
and defensive skills against 
a friend in this outstanding, 
arcade-quality game for the 
Commodore 64. 
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Pigs For Bucks 


It's a laugh a minute as Farmer Brown hurries 
after his pigs to round them up for market. An 
innovative action game for the Commodore 128. 


Better Than RISK” 


Power -you know you love it. 


You used to play 
RISK as a kid. Maybe 
you still do some- 
times — whenever 
you can get enough 
people together. 
Did you ever wish 
you could play by 
yourself? Or make 
changes in the map? 
Wouldn't it be great 
if you could attack 
North Africa from 
North America? Or 
Japan from Brazil? 
Announcing Lords 
of Conquest’ from Elec- 
tronic Arts. 
Itisn’t RISK... it’s better. 
It’s a conquer-the-world 


board game that explodes 
with new life and new pos- 
sibilities because it uses all 
the power of your computer. 
Every battle is alive with 


LORDS-OF 


CONQUEST 


Ty tom Sahoo Toe 


music, color graphics, and 
strategic challenges impos- 
sible in a board game. 

Imagine... 

... having an infinite 
number of unique maps to 
choose from, so each game 
is different. 

...marching your armies 














A Great Strategy Game 
+ Five kinds of forces to fight with —horses, wea- 
pons, boats, territory positions, and cities. 
* Five kinds of wealth to fight for—gold, timber, 
iron, coal, and herds of horses 
+ For 1-4 players. As fun for one as itis for four. 


How to order: Visit your retailer. If you are u 





New Worlds to Conquer 
+ An infinite variety of game maps 

* Create your own, or play any of 20 built-in maps 
like Ancient Rome, European Wars, and The World. 
* The computer can generate unlimited ran- 
dom maps 


ELECTRONIC ARTS” 


(in CA call 800-562-1112). The direct price is $32.95 for the Commodore version. Apple and Atari vers 


Direct Sales, PO, Box 7530, San Mateo, CA 94403, Add $5 for shipping and ha 


Canadian). Al 


For a complete product catalog, send 50¢ and a stamped, self-addressed envelope to Ele 18 Catal 


Parker Brothers Co. Commodore is a registered trademark of Commodore Business Machi 
Borderlands and Cosmic Encounter are registered trademarks of EON Software. Lords of Conquest and Elec 


Apple is a register 





onto warships for 
attacks across oceans. 

...great multi- 
player games, com- 
plete with treaties, 
trades, and treachery. 

... playing chal- 
lenging solo games 
against an intel- 
ligent computer 
opponent. 

...a built-in game 
editor powerful 
enough to be called 
a ‘Strategy Game 
Construction Set.’ 

Lords of Conquest. No 
more mucking around with 
cards and dice and little 
pieces of plastic that roll 
under the couch. Now 
you're free to concentrate 
on more important things. 
Like exterminating the 
opposition. 


Strategy Game Construction Set 
+ Variable game settings —you set the locations and 
abundance of resources, force, and transport 
* You decide the luck facto. 
+ 4 levels of complexity. 
+ Dlevls of handicapping. 


{guarantee on direct orders 
isa registered trademark of. 


le Arts are registered tradematks of Electronic Arts 


Lords of Conquest is based on the board game “Borderlands”” by EON—the creators of “Cosmic Encounter” 








USE THE BRAINS YOUR 
COMMODORE WASN'T BORN WITH. 


Right at Your Fingertips 
in CompuServe’s 
Commodore” Forums 


Our Commodore Forums involve 
thousands of Commodore users world- 
wide. These Forums show you just how 
easy and fun it is to get the most from 
your Commodore Computer. 

The Commodore Communications 
Forum provides the latest news on com- 
munications software and advice on 
how to effectively use your machine for 
online computing. 

The Commodore Programming 
Forum supports programmers and 
developers of Commodore 8-bit 
computers. 

The Commodore Arts and Games 
Forum is for all Commodore 8-bit 
computers. Compose or play music, 
create or retrieve colorful graphics, and 
download games software. 

The Commodore Amiga® Forum is 
the national resource for all business 


and entertainment applications in the 
Amiga community. 


Easy access to free software. 

© Download first-rate, non-commercial user- 
supported software and utility programs. 

@ Take advantage of CompuServe's inexpen- 
sive weeknight and weekend rates (when 
Forums are most active, and standard online 
charges are just 10¢ a minute). 

© Go online in most major metropolitan areas 
with a local phone call. 

¢ Receive a $25.00 Introductory Usage 
Credit when you purchase your CompuServe 
Subscription Kit. 


Information you simply can’t find 
anywhere else. 

Use the Forum Message Board to 
exchange mail with fellow members. 
Join ongoing, real-time discussions in a 
Forum Conference—with Commodore 
luminaries like Jim Butterfield, Jim 
Gracely, Bob Landwehr and Steve 
Punter. Scan Forum Data Libraries for 
free software, documentation and con- 


tributions from Commodore enthusiasts. 


Enjoy other useful services, too. Like 
electronic editions of your favorite maga- 
zines, newsletters and articles, including 
Family Computing, OMNI Online and 
the Electronic Gamer” 


All you need is your Commodore 
computer and a modem...or almost 
any other personal computer. 

‘To buy your Subscription Kit, see your 
nearest computer dealer. Suggested re- 
tail price is $39.95, To receive our free 
brochure, or to order direct, call 800- 
848-8199 (in Ohio, call 614-457-0802), 
Ifyou’re already a CompuServe sub- 
scriber, type GO CBMNET (the Com- 
modore Users Network) at any ! prompt 
to see what you've been missing. 


CompuServe’ 


Information Services, RO. Box 20212 
5000 Arlington Centre Bivd, Columbus, Ohio 43220 


800-848-8199 


In Ohio, call 614-457-0802 
‘An H8R Block Company 








_ There seems to be some 
clisagreement as towhich one 
of our Commodore programs 
isthe most fun. 


Sometimes it's tough to make everybody happy all of the titles you'll surely find at least one you have to get your hands 
time. But that's not your problem, on. Maybe two. Even three. 
Mindscape makes so many great Commodore® software The choice is up to you. No holds barred. 
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Tokyo for $19.95 


In the continuing evolution of scenery, SubLOGIC introduces 
the Japan and San Francisco Bay Area Scenery Disks for Flight 
Simulator II and Jet. 


* Tokyo to Osaka is a comfortable 240-mile flight. The natural 
beauty of the Japanese coastline and mountain ranges 
complement the standard cross-country details. 


+ The beautiful San Francisco Bay Area “Star” Scenery Disk is 
perfect for concentrated sight-seeing. 


+ For the cross-country adventurer, our standard Western U.S. 
scenery (Disks 1-6) contains major airports, nav-aids, cities, 
highways, rivers, lakes, and mountains, 


SubLOGIC Scenery Disks are available individually for $19.95. 
The six-disk Western U.S. set is available for $99.95. See your 
dealer, or write or call SubLOGIC for more information. 


SulLOGIC 


Corporation 
713 Edgebrook Drive 
Champaign IL 61820 
(217) 359-8482 Telex: 206095 


Order Line: (800) 637-4983, 
(ercotn es Aaa area) 
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ealtiors 


Notes 


Since last issue, when we printed a 
rare combined COMPUTE!/GAZETTE 
editorial, we've had several inter- 
esting comments from readers. 
Some apparently took our com- 
ments regarding the Amiga as 
“‘Amiga-negative.’’ We'd like to 
clarify, We feel, without reserva- 
tion, that the Commodore Amiga is 
one of the most technically superior 
personal computers available on 
the market today. We also regret 
that the computer has not sold in 
greater quantities. We feel that the 
fact that the Atari ST has sold in 
greater quantities is indicative that 
there is a market out there to be ex- 
ploited. We simply think that Com- 
modore should (and could) have 
done—and hopefully will do—a 
better job of selling the computer. 
As many of you are aware, we have 
been steadfast supporters of these 
new milestones in personal com- 
puting. The COMPUTE! Books di- 
vision has more titles in support of 
both the ST and the Amiga in 
print—and gets them there soon- 
er—than any other book publisher, 
Our support remains strong and 
consistent with our reputation for 
quality. The fact is that to date all 
indications have been that the ST is 
outselling the Amiga by significant 
quantities, and that fact is not 
something we can alter. Frankly, 
we'd like to see them both selling 
quite well, and we continue to be- 
lieve that the marketplace, properly 
addressed, can support such a no- 
tion. As Nigel Shepherd points out 
in a very excellent interview in this 
issue, previous sales comparisons 
have been comparing Atari world- 
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wide to Commodore North Ameri- 
ca. Now that Commodore has 
actively begun to promote and mar- 
ket the Amiga in Europe, we'll see a 
greater increase in the installed 
Amiga base. 


A Note For Mr. Brannon 

Whether you’re a recent reader or a 
long-established one, you've en- 
countered the exceptional efforts of 
our Charles Brannon. From Speed- 
Script to Ultrafont +, Charles has 
traditionally been dedicated here to 
the quite supportive role of devel- 
oping some of our major software 
applications, In a staff unique for its 
overall ability, Charles, as Program 
Editor, has been a special contribu- 
tor. He first came to work with 
COMPUTE! as a high school student, 
working after school doing pro- 
gram listings. His first published 
work appeared during the fall of 
1982. Since that time, Charles has 
been a columnist, program designer 
and developer, feature writer, and 
general chief contributor to the va- 
riety of things that we do here. 
Charles has provided a unique and 
important service to hundreds of 
thousands of personal computer 
owners through his support of our 
goal of offering the very best to our 
readers. You've enjoyed his efforts 
in literally dozens of contributions, 
and while we wish Charles well in 
his new employment, we want to 





take a moment here to thank him 
for those contributions. 


Applications Needed; 

Apply Here 

We're constantly seeking good ma- 
terial for our publications. As you 
know, much of what we publish is 
contributed by you, our readers, At 
the moment, we continue to be par- 
ticularly interested in good Amiga 
material for COMPUTE!, as well as 
GEOS material for both the GAZETTE 
and COMPUTE!. We provide a very 
good payment package to our au- 
thors. See the ‘“Author’s Guide” in 
a recent issue. 


The Nigel Shepherd Interview 
We were pleased with the candor 
and openness exhibited by Mr. Nigel 
Shepherd, North American Mar- 
keting Manager for Commodore, in 
his interview in this issue. His com- 
ments are well worth reading, and 
bode well for the company and the 
industry. 


plat ook. 


Robert C. Lock 
Editor in Chief 
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: Commoport BESTSELLERS 


from COMPUTE! Books 


You can depend on COMPUTE! for clearly written, 
easy-to-use books for your Commodore 64. This 
assortment of titles includes some of our most 
frequently requested books containing many of our 
best ever applications, games, utilities, tutorials, and 
programming hints, all ready to type in and use on 
your Commodore 64. 


COMPUTE!'s 





Look over this list of backlist bestsellers, and choose the titles you need to complete your library of first-rate 
Commodore 64 books from COMPUTE!. 


—<—<—<—<—$—_—_——————————————————————————— eee 
COMPUTE!’s First Book of Commodore | COMPUTE!’s Commodore Collection, COMPUTE!’s Commodore Collection, 


64 Sound and Graphics Volume One Volume Two 

Edited, 275 pages Edited, 208 pages Edited, 270 pages 

Clear, useful explanations of the 64’s sound and —_—_An anthology of 28 practical programs in easy-to- This second volume in COMPUTE!'s Commodore 
“graphics capabiities Including tutorials and example _ use form for the Commodore 64 and VIC-20, Collection series includes exciting games, 


$12.95 ISBN 0-942386-55-8 ‘sophisticated applications, versatile educational 
routines, and helpful programming aids for VIC-20 


programs, 
$12.95 ISBN 0-942386-21-3 
COMPUTE!’s Machine Language Routines and Commodore 64 users. 


Creating Arcade Games on the for the Commodore 64 $12.95 ISBN 0-942386-70-1 

Commodore 64 Edited, 255 

Robert Camp, 357 pages Complste rectice language programs and easy-to- All About the Commodore 64, Vol. One 
A guide to creating arcade games on the 64, plus use routines help to make the Commodore 64 


cca Cimrboray 289 pages 
finished games to play and study, more powerful and versatile. For beginning to intermediate programmers who 
$14.95 ISBN 0-942386-36-1 $14.95 ISBN 0-942386-48-5 want to develop the full potential of their 
‘Commodore 64 computers. 
$12.95 ISBN 0-942386-40-X 
Visit your local book or computer store for these titles. Or order directly from COMPUTE!. To order, call toll-free 
800-346-6767 (in NY 212-887-8525) or write COMPUTE! Books, P.O. Box 5038, F.D.R. Station, New York, NY 10150. 
Please allow 4-6 weeks for delivery. 


When ordering, please include $2.00 shipping and handling per book in U.S. and surface mail or $5.00 airmail. North Carolina 
residents add 4.5 percent sales tax. New York residents add 8.25 percent sales tax. U.S. funds only. 


COMPUTE! Publications INC) comreve pane og ae at 


Pott of ABC Contumer Magazines Africa from Holt Saunders, Ltd,, 1 St, Anne’s Road, Eastbourne, East Sussex 
AN patsy ray-lde roan rly te ete BN21 3UN, England, and in Canada from McGraw-Hill, Ryerson Ltd., 330 
Abita of COMPUTE! COMPUTE Gantte, COMPUTE Gavette Due COMPUTE Boek. ond COMPUTES Acie Accicotans: Progress Ave, Scarborough, Ontario, Canada M1P 225. 
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Do you have a question or a problem? 
Have you discovered something that 
could help other Commodore users? 
We want to hear from you. Write to 
Gazette Feedback, COMPUTE!’s GA- 
ZETTE, P.O. Box 5406, Greensboro, 
NC 27403. We regret that due to the 
volume of mail received, we cannot 
respond individually to program- 
ming questions, 





Almost A Command 
I was experimenting with different 
commands on my 128 and accidentally 
typed QUIT. The computer responded 
with UNIMPLEMENTED COMMAND, 
Could you please explain what this 
means? 

Bob Uhrick 


When you type a BASIC keyword, the 
computer looks through the list of com- 
mands it knows, trying to find a match. 
When the matching word is found, the 
computer executes the command. If you 
misspell it or type an illegal command, the 
computer responds with SYNTAX ERROR. 
QUIT is a special case. It’s on the list 
of BASIC commands, but it doesn't do 
anything (except to trigger the UNIM- 
PLEMENTED COMMAND error). Com- 
modore’s engineers apparently dropped 
whatever plans they had for QUIT, There's 
one other command that causes this error: 
OFF. We can only speculate about what 
these two words were supposed to do. 





Don’t Save To Commercial Disks 


On some of the software I bought, the 
disks have about 400 blocks free, I'd 
like to know if it is safe to save pro- 
grams on the empty space, 

Michael Knol 


We recommend against it. It might seem 
that there's empty space on the disk, but 
the software company could be using some 
of the free disk blocks for important infor- 
mation that's needed by the program 
(there are various ways of writing directly 
to disk sectors). If you saved a program 
over this information, you could ruin the 
commercial software. Also, many software 
companies deliberately put error sectors 
on the disks they sell, to prevent users 
from making copies. An error-ridden disk 
wouldn't be very reliable. 
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Dak 


New disks cost only $2 or less, while 
commercial programs often cost $20-$30. 
Using the free space on a commercial disk 
wouldn't save you much money, especial- 
ly when you consider that you might lose 
the software you paid for. 





Modifying The 1520 
I own the Commodore 1520 Printer/ 
Plotter. Its device number is 6, and 
most programs expect the printer to be 
device 4. I would like to know if I can 
change the device number to 4, so I can 
use the 1520 with these programs. 
Anthony J. Wajda 


We have seen instructions for modifying 
the 1520's device number to 4. The pro- 
cess involves cutting a trace inside the 
printer (it’s similar to the way you change 
device numbers on a disk drive). Unfortu- 
nately, we can't find the instructions, 
which were printed in a user group news- 
letter about a year ago. If uny readers 
know the details, please reply. We'll pub- 
lish the answer in an upcoming issue 
(please include a photograph or diagram 
pointing out the traces to be cut). 





True, Not True 
How does NOT work? 
Uzair Hameed Ismail 


Logically, NOT changes true statements 
to false, and vice versa. For example, IF 
NOT(A = 5) THEN GOTO 912 means if 
it’s not true that A = 5, then go to line 
912. This is equivalent to IF A<>5 THEN 
912, which checks whether A is less than 
or greater than 5. 

Occasionally you'll see NOT operat- 
ing on a numeric variable, usually within 
a POKE statement. What NOT does to 
numbers is to reverse the sign and sub- 
tract one. PRINT NOT 9 will show you a 
result of —10, In machine language 
terms, this is a ones-complement opera- 
tion. This is useful in machine language, 
but rarely needed in BASIC, 





Joystick Reader For 64 
Tam writing a game which requires joy- 
stick input. Is there any BASIC routine 
or program to read the input of the joy- 
stick? I own a Commodore 64. 

David Carlson 





Editors and Readers 


The following program reads a joystick 
plugged into port 2: 


CR 10 DIMJ(10):B=56320:FORA=1T 
010:READJ (A) :NEXT 

AM 26 DATA 1,5,6,7,8,6,0,3,2,4 

DI 30 J=J(15-(PEEK(B)AND1S))+1 
28-8* (PEEK(B)AND16) 

DP 49 PRINTI:GOTO30 


Lines 10 and 20 initialize the routine; 
they should be put at the start of the pro- 
gram. Line 30 reads the joystick value into 
the variable J. The following table shows 
the possible values of J and the corre- 
sponding directions: 

Value of J Joystick Direction 
center 

north 

northeast 

east 

southeast 

south 

southwest 

west 

northwest 

If the joystick button is pressed, 128 
is added to the value of J (for example, if 
the firebutton is down and the joystick is 
pointing south, then J will have a value of 
133), To read a joystick in port 1, change 
B=56320 to B=56321 in line 10. Inci- 
dentally, the value of J in this program is 
exactly the same as the value returned by 
the function JOY on the Commodore 128. 


@eNAURERHS 


A Hidden Signature 

Plus/4 and 16 owners who would like 

to see the names of the people who de- 

signed their computer should type SYS 

52651. Four names appear—one flash- 

ing, one in reverse [and two normal]. 
Paul Arsenault 


Thanks for the information. You'll occa- 
sionally find messages like this hidden in 
software. 





Faster Printouts 

I've heard about printer buffers that are 

supposed to decrease the time it takes a 

printer to print, and also free up the 

computer while the printer is working. 

Could you explain how buffers work? 
Mark R. Vogel 


Printers are mechanical devices; adding a 
buffer won't increase the speed at which 
the printer runs, Buffers can save time, 
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though, especially if you do a lot of 
printing. 

If you want to understand how a 
buffer works, it helps to know what hap- 
pens when the computer tells the printer 
to start printing. The individual character 
codes are sent one by one to the printer. A 
computer can output the characters much 
faster than the printer can receive and 
print them, so at regular intervals the 
printer has to send a signal asking the 
computer to stop for a moment. When the 
printer gets caught up, it tells the com- 
puter to resume. During this series of 
stop-and-go communications, the com- 
puter is busy; you can't use it until the 
printing is finished. 

A printer buffer is a section of memo- 
ry that connects between the computer 
and the printer. You might install it inside 
the printer or it might be in a separate 
box. When the computer transmits the 
various characters, the buffer receives and 
stores them in memory as fast as the com- 
puter can send them, The process doesn't 
take very long, because there are no 
pauses. The buffer then starts feeding the 
characters to the printer, In the meantime, 
you've got control of the computer, be- 
cause as far as the computer knows, it has 
already printed out the whole file. 





Out Of Paper 
Ihave a 64, a disk drive, and an Okidata 
120 printer. When I turn on the power 
to all three devices and there is no pa- 
per in the printer, the disk drive does 
not respond to any commands. Why 
does this happen? 

Mark Hlavac 


Many printers have a built-in paper sen- 
sor that can tell when you've run out of 
paper. If the paper runs out in the middle 
of printing a document or if you're using 
single sheets of paper, the sensor stops the 
printer, sending a signal to the printer to 
stop output, Some printers may make a 
beeping noise or start blinking a light 
when the paper is gone. 

This feature is designed to prevent 
the printer from printing directly on the 
platen, It’s also useful when you acci- 
dentally run out of paper; you can add 
new paper and continue where you left 
off. 
uf Since printers and disk drives share 
the serial bus, the printer's request to stop 
sending data affects other devices on the 
bus. There's usually a way to turn off the 
paper sensor, either by sending a com- 
mand to the printer or by changing a DIP 
switch. Check your manual for details. 





SpeedCheck Alphabetizer 

In the December 1985 issue, you pub- 
lished “‘SpeedCheck,” a spelling check- 
er for the SpeedScript word processor. 
After using it for a few months, I decid- 
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ed to check the words against a diction- 
ary (the book kind). But the words are 
arranged by the order they're entered 
in; they're not in alphabetical order. 

I would appreciate an explanation 
of how to read the dictionary files, and, 
if possible, a program to alphabetically 
sort the entries, This would aid in look- 
ing for duplicate entries and checking 
for correct spelling. 

John Edward 


First a few notes about how “SpeedCheck” 
stores words in the files, Twenty-six files 
hold the words, one file for each letter of 
the alphabet, The filenames range from 
“A to “Z"", Every word in a file starts 
with the same letter, so the first letter is 
omitted. For example, if the file named 
“D" contains the words delete and deli- 
cious, they appear in the file as elete and 
elicious, because the first letter is already 
known, 

SpeedScript stores text as screen 
codes, so SpeedCheck follows this conven- 
tion. The letters a, b, and c have screen 
codes 1, 2, and 3, rather than ASCII codes 
65, 66, and 67. Some characters use the 
same number for both screen and ASCII 
codes (the character 5 is a 53 in both lists, 
for example). Before alphabetizing or 
printing to the screen, you'd have to con- 
vert the screen codes to ASCII, 

Also, there are no separators between 
words in the dictionary. SpeedCheck adds 
the number 128 to the screen code for the 
last character in each word. When you're 
reading through the file, you have to watch 
for numbers higher than 127. One final 
note: The first character in every word file 
is a 13, which should be ignored (this is 
necessary for reasons we can't go into 
here). 

The following program reads through 
a SpeedCheck word file, alphabetizes the 
words, and prints them to the screen: 


ES 10 L$="A":PRINT"READING FIL 
E ";L§ 





HG 20 OPEN1,8,2,L§ 
FF 30 FORJ=07T01 :GET#1,A$:J=ST: 
PRINT"."; 
FF 40 IPAS$>CHR$(127)THENT=T+1 
PA 50 NEXTJ:CLOSEL 
AD 66 PRINT:PRINT,T;"WORDS FOU 
ND": DIMWS (T) 
FK 70 PRINT"READING WORDS INTO 
MEMORY" 
MR 80 OPEN1,8,2,L$:GET#1,A$ 
DC 98 FORJ=1TOT 
CH 108 W$(J)=L$ 
CJ 116 GET#1,A$ :IFA$<CHRS (128) 
THENWS (J )=W$ (J) +CHRS (64 
+ASC(A$)) :GOTO116 
AX 120 g(a te COD ECan E (nEC( Ag 
)-64 
DF 136 PRINTW$(J), :NEXTJ :CLOSE 
1 
AR 140 PRINT:PRINT"***ALPHABET 
IZING***" 
RJ 150 C=INT(T/2) 
BS 160 FL=0:FORJ=1TOT-C 
XX 170 IFWS(J)<=WS(J+C)THEN1LOO 
QS 188 TEMPS=WS (J) :WS(J)=WS (J+ 
C) WS (J+C)=TEMP$ :FL=1 
AH 190 NEXTI:PRINT"*";:IF FL T 





HEN FL=6:GOTO160 
SP 208 C=INT(C/2):IF C THEN 16 
a 


MJ 210 PRINT:PRINT "DONE" 
BC 226 FORJ=1TOT:PRINTWS(J),:N 
EXT 


To read files other than “A", change 
the variable L$ in line 10, Lines 30-50 de- 
termine how many words are in the file by 
counting any character higher than 127 
(note that the system's STatus variable 
will equal zero as long as there's more in 
the file, so the FOR-NEXT index variable 
] is continually set back to zero as long as 
there is more to read). 

Lines 90-130 READ the words into 
an array, converting them to ASCII in the 
process. Lines 150-200 then alphabetize 
the list, using a shell sort, which is faster 
than a simple bubble sort and simpler 
than the faster quick sort. Line 220 prints 
the alphabetized list to the screen. If you 
prefer a printed list, add OPEN 4,4: 
CMD4 just before line 220; then 
PRINT #4; CLOSE4 at the end of the 
program, 

Note that the program simply prints 
a list of the words in alphabetical order; it 
doesn’t actually alphabetize the words in 
the disk file, Although alphabetizing the 
file might seem a logical thing to do, it 
won't improve the performance of Speed- 
Check. In fact, for large dictionary files, 
alphabetizing the entries would almost 
certainly slow down checking. When 
checking words, SpeedCheck must read 
sequentially thorough the file searching 
for matches, Thus, the optimum arrange- 
ment for a SpeedCheck dictionary is to 
have the most commonly used words near 
the beginning of each file so that they will 
be found faster. 





Scrambling Letters 


I'ma brand-new subscriber with a 128, 
1902 monitor, and 1571 drive. Would 
you please publish a short randomizing 
letters program? I like to work Scram- 
lets (for example, CLORLS = SCROLL, 
or KEBRAM = EMBARK). 

Robert Wessel 


The program below works on all Commo- 
dore computers. It asks you to input a 
word and then prints ten scrambled ver- 
sions, If you're trying to unscramble, enter 
the scrambled word and ten other scram- 
bled versions will appear. You can then 
see if any look like normal English words. 


SF 16 PRINT"ENTER WORD TO BE S 
CRAMBLED." 

INPUTWS :SZ=LEN(W$):DIM L 
$(S%) 
FORJ=1T0S2Z: L$ (J) =MID$ (WS 
+J,1) sNEXT 

FORJ=1T018 

FORK=1TOSZ: R=INT(RND(1)* 
SZ+1) 

TEMP$=LS(K) :L$(K)=L$(R): 
L$(R)=TEMPS 

NEXTK 

FORK=1T0S2: PRINTLS$(K) 7; :N 
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Frankie have sent you over 60 tasks in your This combination awards you the minimum _ on the Bar Charts (when the word BANG will 
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Pleasure Dome. Tasks ranging from the ‘search for the Special Door - the Door to and achleve a score of 87,000 

trivial, to heroic feats of skill and intelligence. the Ultimate Experience — the heart of the Pleasure Points, 

Whenever you complete these challenges a Pleasure Dome. ” i 
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Sports Training- 
A More 
Competitive 
You. 





No matter what the sport, we have become a nation 
conscious of performing fo win. We spend hours training, 
Practicing, competing. Bodylink gives you the individual 
attention of the best pro—anytime you desire for as long 
as you wish—and at no extra cost. The Bodylink System 
provides instantaneous feedback on the exact manner in 
which your muscles are performing, enabling you to 
correct your swing or refine your pitch while still in motion. 
Bodylink allows a true two-way conversation between you 
and your body, giving you the winning edge. 

MUSCLE COORDINATION PACKAGE—S$139,95 

This package includes Bodylink, Standard EMG Sensor and 
Lead Set, Head-Band, three electrodes and two software 
cartridges containing several programs. 


§ Reducing Stress. 
A Healthier and 


fa More Productive 
f You 





Medical authorities now consider stress a major health risk 
which may result in migraines, ulcers, back pain and 
heart attacks, With Bodylink you have within reach a 
Powerful stress reduction system. Bodylink allows you fo 
focus on physical signs of stress such as muscle tension 
and skin temperature. By using this feedback, Bodylink 
quickly and effectively teaches you to reduce stress for 

a healthier and happier life. 


STRESS REDUCTION PACKAGE—$209.95 

This package includes Bodylink, Biofeedback EMG Sensor and 
Lead Set, Head-Band, three Electrodes, Biofeedback 
Temperature Sensor, and two sofiware cartridges containing 
several programs. 
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YOUR COMMODORE 64/128 


INTO A HEALTH AND FITNESS SYSTEM. 
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Getting in Shape. ..Easier... 
Safer... More Effectively 


Home exercise now becomes exciting and more effective. 
With Bodylink you can be sure you are exercising for 
maximum benefit. While using the aerobic exercise 
package, Bodylink monitors your heart rate and helps you 
determine the ideal level you need for aerobic gain. 

With the isometric muscle exerciser and training package, 
Bodylink guides you to do muscle developing exercises 
correctly and effectively. Bodylink motivates you fo work 
harder if you are not reaching your target level, or helps 
you slow down if you are working too hard. 


AEROBIC EXERCISE PACKAGE—S$199.95 

This package includes Bodylink, Standard EMG Sensor and 
Lead Set, Leg-Band, Pulse Rate Sensor, and two software 
cartridges containing several programs, 


ISOMETRIC MUSCLE EXERCISE & TRAINING PACKAGE—$139.95 
This package includes Bodylink, COMET, and two software 
Cartridges containing several programs. 


BODYLINK is a peripheral that plugs into the cartridge slot of the 
Commodore 64/128 computer. Knowledge of computers or computer 
programming is NOT necessary fo use BODYLINK. You don't even 
need a disk drive to save your data. Various sensors are used to 
tecord internal signals from your body and relay them to BODYLINK. 
You simply place the sensor against the part of your body to be monl- 
tored and watch the result on your TV screen, 


‘Commodore is a registered trademark of 


‘Commodore Electronics Limited. 


DEALERS, PROGRAMMERS AND USER GROUPS 
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LOOK BETTER! 
FEEL BETTER! 
COMPETE BETTER! 




















With the BODYLINK ‘ 
“COMET’™ (COmputerized 
Muscle Exerciser and 
Trainer) attachment, you 
can build and tone the 
muscle groups of your 
stomach, chest, back, 
legs, and arms. COMET is 
a electronic muscle builder 
that is connected to BODY- 
LINK and sends a mes- 
sage fo your TV screen 
when it’s compressed or. 
pulled. 
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EXT:PRINT 
QC 9 NEXTJ:PRINT: RUN 
Scrambling is the opposite of sorting 
(see the previous letter), but the technique 
is basically the same. Instead of an IF- 
THEN to compare two members of a list 
and put them in order, you use the RND 
function to randomize two elements of the 
array, putting them in a random order, 





Connecting A VCR And Computer 
Monitor 
Could you please give me a complete 
set of directions on how to hook up a 
VCR to my 1702 monitor? Do I need 
special cables? Can I record and play 
tapes using the VCR and monitor? 
Dan Andrichuk 


It's quite easy to use a computer monitor 
with a video cassette recorder, There 
should be a jack on the back of your VCR 
labeled Video Out and another labeled 
Audio Out. These two outputs can be di- 
rected to the jacks called Video and Audio 
on the front of your 1702. Check the 
switch on the back to make sure it’s set to 
the front (not the rear) connections. 

The cable you use should have two 
RCA plugs on one end and two RCA plugs 
on the other. Look for the cable at a video 
or electronics store. The cable can also 
connect two VCRs together, to copy from 
one to another, 





Translating Between Word 
Processors 


I just upgraded from a word processor 
which used program files to one that 
uses sequential files. I would like to use 
my old files in the new program. Is 
there a program that can change them? 

Kevin L. McClintock 


Try running your new word processor and 
when you're prompted for a filename to 
load, type filename,p. If that doesn't 
work, run your old word processor, load 
the file you want, and then save it with 
the name filename,s. Adding the ,p and,s 
(for PRG and SEQ files) sometimes allows 
you to get around the incompatibility be- 
tween files. You may see two additional 
characters at the beginning of the file 
when it’s loaded into the new program. 
If you succeed in loading files from 
your old word processor, you may encoun- 
ter more serious problems. Some word 
processors, especially ones that use PRG 
files, save text as screen codes, the num- 
bers you use for POKEing to the screen. 
Others, especially ones that use SEQ files, 
use Commodore ASCII codes, the CHR$ 
numbers for PRINTing to the screen. If 
the file loads, but the characters look 
strange, this may be the situation. You 
may have to write a program that trans- 
lates from one format to the other. Or 
check the documentation; if your old word 
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processor saves files as screen codes, 
there's probably a way to create an ASCII 
file from within the program. You'd have 
to load a file from the old program and 
then resave it as an ASCII file. 

There's one further problem you may 
run into, but it's minor. There's no stan- 
dard for printer-formatting codes. If you 
use underlining, superscripts, or other 
such features, the codes that turn the 
functions on and off may turn into unpre- 
dictable characters when you transport 
the file from one word processor to another. 





Teaching Grammar To A Computer 
Could you please tell me how an ad- 
venture game parser works, and write a 
short demo program? 

Rick Meyer 


The following statements might be used in 
an adventure game: 

GET RING 

OPEN RED DOOR 

ASK FRIENDLY ELF ABOUT MAP 


The first has the simplest structure— 
a verb and an object. The second is a little 
more complicated because of the adjec- 
tive. If a room has more than one door and 
the player says OPEN DOOR, the pro- 
gram has to be able to ask WHICH 
DOOR? The third statement is the most 
complex. ASK applies only to characters 
in the game (you wouldn't allow some- 
thing like ASK DOOR ABOUT WIZARD, 
unless your game permits conversations 
with doors). Another consideration is that 
a friendly elf might be willing to talk, but 
a hostile elf, while able to talk, would not 
be amenable to chatting. 

When you're writing your own ad- 
venture, it might be best to limit sentences 
to two words—a verb followed by an ob- 
ject—at least until you get the parser 
working. Before you start programming, 
make a list of verbs and objects you want 
to allow, and give each a number. Let's 
say the verbs will be GET, OPEN, and EX- 
AMINE. At the start of the program, READ 
these three words into a string array: 

10 DIM VBS(3) 
20 FOR J = 1 TO 3: READ VBS()): NEXT 
30 DATA GET, OPEN, EXAMINE 


In the main loop of the program, 
you'd input a string from the player, parse 
it (break it into individual words), and 
then act on the instructions: 


400 PAS = “”: INPUT PAS: LP= 
LEN(AS): IF LP = 0 THEN 400 

410 B = 0: FOR J = 1 TO LP 

420 IF MIDS(PASJ,1) = CHRS(32) THEN 
B=J—1:J=IP+1 

430 NEXT J 

440 IF B = 0 THEN PRINT “PLEASE 
ENTER A VERB AND AN OBJECT”: 
GOTO 400 

450 PVS = LEFTS(PAS,B) 

460M = 0 

470 FOR J = 1TO3 

480 IF PV$ = VBSQ) THEN M = J:J = 








1000 

490 NEXT J 

500 IF M = 0 THEN PRINT “I DON’T 
UNDERSTAND”: GOTO 400 

510 ON M GOSUB 800, 900, 1000 

520 GOTO 400 


Line 400 inputs the player action 
(PAS) and tries again if nothing was typed. 
Lines 410-430 then try to find a space 
(CHR$(32)), because a space will mark the 
boundary between the verb and object (on 
the 128, you could substitute the INSTR$ 
function, which searches for the occur- 
rence of a substring). If no space character 
is found, the program goes back to the IN- 
PUT line. Otherwise, the LEFT$ in line 
450 extracts the verb PV$ from PAS. Fi- 
nally, the verb is checked against the list 
previously set up (lines 470-490). If a 
match is found, line 510 sends the pro- 
gram to the appropriate routine (GET at 
line 800, OPEN at 900, or EXAMINE at 
1000). 

Line 800 will parse the remainder of 
the string and respond appropriately. GET 
DOOR is impossible. GET RING would be 
fine if there was a ring inside the room 
(you'd use another array to keep track of 
which objects are in which rooms). GET 
SNAKE might have unpleasant conse- 
quences, And so on. 

Adventure games rely heavily on ar- 
rays, as you may have noticed. If you can 
manage the verb-object parser, you can 
later expand the program to include ad- 
jectives and more complex statements. 


Medical Computing 
Iam a practicing physician and have a 
Commodore 128, I would be very inter- 
ested in knowing if there are any pro- 
grams for physicians in the way of drug 
use or drug interaction. I would also be 
interested in any kind of program for 
physicians in office management. 
Susan K. Pyle, M.D. 


We have seen information about a service 
called MEDLINE, which is available on 
CompuServe (GO PCH). It contains in- 
dexes and abstracts from 3400 journals, 
with over 3.4 million references on drugs, 
diagnosis, surgery, and treatment pro- 
grams. The fee for accessing this service is 
$24 per hour. There are other services of 
this kind as well. 

Even if the 3.4 million references 
were only 100 words (500 characters) 
apiece, around 1.7 billion bytes (1.7 giga- 
bytes) of storage would be required. That 
much information would fill up more than 
5000 double-sided 1571 disks, or 10,000 
disks for the 1541. There may someday be 
@ compact disc reader (CD-ROM player) 
which can handle such a large amount of 
data, but for now you can only access this 
kind of database by using a modem to con- 
nect with a mainframe. 

A single disk would probably not 
hold enough information to provide a 








GET UP T0 200 FUN-FILLED 
PROGRAMS EACH YEAR- 


when you subscribe now to COMPUTE!’s Gazette 


Subscribe to COMPUTE!s Gazette today 
through this special introductory money-saving 
offer, and you'll -be getting a lot-more than just 
another computer magazine. That’s because 
each issue of COMPUTE!s Gazette comes 
complete with up to 20/all-new, action‘packed 
programs, 

Subscribe now and/you can depend’ ona 
steady supply of high quality, fun-filled 
programs for your Commodore computer— 
programs like Disk Editor, Mini-Filer” Arcade: 
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Thesuperb programs: you'll find“inveach 
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low subscription price: 
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comprehensive and useful list of drug 
interactions, 

There are a couple of choices you 
have for medical office management: gen- 
eral-purpose software or vertical-market 
software, For word processing, you won't 
need a specialized program; most word 
processors can handle office correspon- 
dence, regardless of whether it’s for a doc- 
tor’s office or an art supply store. For 
billing and insurance claims, you could 
use a standard accounting package, al- 
though you might have to adjust your pro- 
cedures to fit the software. For something 
more specific like software written for 
medical offices, you'll be more likely to 
find a package for CP/M mode than for 
either 64 mode or 128 mode. 





128 Text Screen Dump 


Included on the Test/Demo disk for the 
1571 disk drive are programs entitled 
“PRINT.UTIL” which provide users 
with a screen dump of the text screen 
whenever the SHIFT and CTRL keys 
are pressed simultaneously. Unfortu- 
nately, this program only has versions 
for the Commodore 64, Plus/4, and 16. 
Could you please provide a version for 
the 128? 

Philip Russo 


The program below prints a text screen 
dump of most 128 programs. The program 
does not print hi-res screens or sprites. 

After you've entered the program, 
save a copy to tape or disk; then load it 
and type RUN. To activate the screen 
dump utility, type SYS 3072. Once this 
has been done, any time the CONTROL 
and SHIFT keys are pressed simultaneous- 
ly, the screen is dumped to the printer. 
Make sure that the printer is turned on 
before you try to print the screen. 

To deactivate the screen dump utili- 
ty, press RUN/STOP-RESTORE, 


FM 10 FORA=3072703238 :READB:C= 
C+B:POKEA, B:NEXT: IFC<>26 
513THENPRINT"DATA ERROR" 
END 

PRINT" {CLR]SYS 3672 TO A 
CTIVATE[20 SPACES}PRESS 
(SPACE }SHIFT+CONTROL TO 
(SPACE }PRINT" 

DATA 120,169,13,141,20,3 
+169,12,141,21,3,88,96,1 
65,211,201,5,208,89 
DATA 216,169,128,141,26, 
208 ,160,255,169,4,170,32 
1186, 255,32,192, 255,162, 
4 


XA 26 


GM 30 


PA 40 


RQ 5@ DATA 32,201,255,169,6,13 
3,251,141,168,12,141,166 
712,169,4,133,252,162,3 
DATA 160,6,177,251,32,11 
1,12,268,204,168,12,268, 
245,230, 252,262,48,9,268 
DATA 238,169,232,141,168 
112,208,231,169,13,32,21 
®,255,169,13,32,216,255, 
169 

DATA 4,32,195,255,32,204 
+255,120,169,129,141,26, 
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PE 60 





MG 76 


GQ 86 





208,76,101,258,142,167,1 
2 


SA 96 DATA 141,169,12,41,63,14 
+169,12,44,169,12,16,2,9 
+128,144,4,166,244 

QR 100 DATA 208,4,112,2,9,64,3 
2,218,255,238,166,12,17 
3,166,12,201,48,298,10 

KK 116 DATA 169,8,141,166,12,1 
69,13,32,216,255,174,16 
7,12,96,8 





POKEing Around 
I need to learn a lot more about my 64 
to use it efficiently. Any suggestions on 
reading material that will explain 
PEEKs and POKEs? 

Dan Lemke 


I've been trying to write some machine 
language programs. Instead of having 
to create operations for addition, sub- 
traction, multiplication, division, and 
exponentiation, I tried disassembling 
BASIC to find out what happens when 
the +, —, *, /, and t keys are pressed, 
T’ve had no luck. Is it possible to use 
those parts of BASIC in a machine lan- 
guage program? If not, why? 

Joseph N. Cox 


What both of you are looking for is a mem- 
ory map. Over the past few years, abbrevi- 
ated memory maps have been published in 
COMPUTE!’s GAZETTE and elsewhere. 
For more detailed maps, we'd suggest 
Mapping the 64 and Mapping the VIC 
from COMPUTE! Books, both of which 
provide a comprehensive explanation of 
all memory locations (Mapping the 128 
will be available soon). Each location in 
RAM is described, often with PEEKs and 
POKEs you can try out or a short program 
that illustrates a programming technique 
in BASIC or machine language. 

In addition to the PEEKs and POKEs, 
you'll find information about the ROM 
routines that perform operations like ad- 
dition, multiplication, and so on, with an 
explanation of setup routines that should 
be called first. The ROM routines are most 
useful in machine language programs, al- 
though BASIC programmers will find 
many handy SYSes which can be used in a 
program. 





Upgrading CP/M 

How can 128 owners obtain the latest 

revision of the CP/M system disk? I 

have not been able to get any infor- 

mation from Commodore about this. 
David L. Heritage 


When you boot the CP/M disk, a version 
date appears on the screen. The latest re- 
vision we know of is 6 DEC 1985. Other 
versions have a June or August release 
date. 

The December 6 CP/M version can 
communicate with a modem; earlier re- 
leases did not allow you to use a modem, It 





also recognizes the memory expander as 
drive m:. If you don’t use your modem in 
CP/M mode and don’t own a memory ex- 
pander, you can probably get by with the 
older CP/M. The memory expander comes 
with the latest version of CP/M, so that's 
one way to obtain it, Also, since the begin- 
ning of the year, the December 6 version 
has been included with the 128, 

If you want to upgrade, there are sev- 
eral ways to obtain the newer CP/M. You 
need a CP/M program called NEWSYS- 
«COM, When you run it, it rewrites parts 
of the system files CPM+ and CCP to 
transform them into the December 6 
CP/M. NEWSYS.COM is in the public 
domain, and is available from many Com- 
modore user groups and from groups that 
distribute public-domain software. 

In addition, NEWSYS.COM is avail- 
able for downloading from CompuServe 
and QuantumLink. Paradoxically, you 
can’t download NEWSYS unless you have 
the new CP/M—and you can't have the 
new CP/M until you download NEWSYS. 
There are three ways to work around this 
problem. You can download in 64 or 128 
mode to a Commodore formatted disk and 
then download a second program that 
reads a file from a Commodore disk and 
writes it to a CP/M disk. Or you can 
download a terminal program that runs in 
128 mode, but can write to CP/M disks. 
Finally, if you own a 1571 disk drive, you 
can try to find someone who owns a mo- 
dem and a Kaypro, Osborne, or Epson 
computer and who's willing to download 
NEWSYS from CompuServe (Quantum- 
Link is Commodore-specific, and won't 
work with these other computers). The 
1571 is able to read disks from these 
computers. 





Character Set Mover 
Iam writing a program for my Commo- 
dore 64 and 128 that uses custom char- 
acters. But it takes too long to copy the 
character set in BASIC, Could you pro- 
vide me with a machine language rou- 
tine that will speed up this process? I 
want to move the character set to loca- 
tion 12288. 

John Hollis 


We've written two routines—one for the 
64, the other for the 128—to copy the 
character set from ROM to RAM at 12288. 
To change where the character set is cop- 
ied to, change the number 48 in line 30 to 
the page number of the character set (the 
memory location divided by 256). 

Line 20, in both programs, contains 
the necessary POKEs to set up an alter- 
nate character set at location 12288, then 
redefines one character (the @) to become 
a reversed space. 


Character Mover For 64 

EB 16 FORA=828T0859 : READB: POKE 
A, B:NEXT: POKE56333 ,127:P 
OKE1, 51:SYS828:POKE1,55 





forthe Commodore 128 














Detallod guide presents tho 128's 
operating system, oxplains graphic 
80 





chips, Memory Managomont Un 
column graphics and commented 
ROM istings. S00pp $19.95 








Get all the inside information on 
BASIC 7.0. This exhaustive hand- 
book is complote with commented 
BASIC 7.0 ROM listings, Coming 
Summor'86. $19.95 








Loarn tundamontals of CAD while 
developing your own system. Design 
objects on your screen to dump toa 
printor, Includes listings for '64 with 
Simon's Basic, 200pp $19.95 





Introduction to programing; problem. 
analysis; thorough description of all 
BASIC commands with hundreds of 
oxamplos; monitor commands; utit- 


ties; much more. $16.95 


Abacus 


P.O. Box 7219 Dept. GA Grand Rapids, Ml 49510 - Telex 709-101 - 


Optional diskettes available for all book titles - $14.95 each. Other books & software also available. Call for the name of your 
nearest dealer, Or order directly from ABACUS using your MC, Visa or Amex card, Add $4.00 per order for shipping. Foreign 
orders add $10.00 per book. Call now or write for your free catalog. Dealer inquires welcome--over 1400 dealers nationwide. 





Filled with info for everyone, Covers 
80 column hi-res graphics, win- 
dowing, memory layout, Kernal 
routines, sprites, software pro- 
tection, autostarting. 300pp $19.95 


Presents. dozens of programming 
quick-hitters. Easy and useful 
techniques on the operating system, 


stacks, zero-pago, pointers, tho 
BASIC interpreter and more, $16.95 














Insiders’ guide for novice & ad- 
vanced users, Covers sequential & 
tolative files, & direct access com- 
mands, Describes DOS routines. 


Commented listings. $19.95 








Essential guide for everyone intor- 
ested in CP/M on the 128. Simple 
explanation of tho operating system, 
memory usago, CP/M utility pro- 


grams, submit files & more, $19.95 


Commodore 128™ is a trademark of Commodore Electronics, Ltd. 


Software 


SF 20 POKE56333,129:POKE53272, 
28 :FORA=12288TO12295 :POK 
EA, 255 :NEXT 
DATA169,8,133,251,133,25 
3,168,169,48,133,252,169 
1208,133,254,162,7,177,2 
53 


CR 38 


PC 48 DATA145,251,136,208,249, 
230,252,230,254,202,16,2 


42,96 


Character Mover For 128 

FH 10 FORA=3072703103 :READB:PO 
KEA, B:NEXT : BANK14 :SYS307 
2:BANK15 

POKE2604 , 28:POKE217,4:BA 
NKO :FORA=12288T012295 :PO 
KEA, 255 :NEXT 
DATA169,0,133,251,133,25 
3,168,169,48,133,252,169 
208,133, 254,162,7,177,2 
53 


xc 20 


CR 30 


PC 40 DATAL45,251,136,208,249, 
230,252,230,254,202,16,2 


42,96 





Math Conversions 


I can’t seem to find any information in 
my 128 System Guide about calculating 
cube roots. I have written about 100 
programs with graphics for machine 
shop use, but I need the cube root func- 
tion, Also, I never use the sine ex- 
pressed in radians; I find if I divide the 
radians by 57.2958 I get the sine with 
which I’m familiar. 

Edward Ellis 


Just to the left of the RESTORE key is the 
up-arrow key (t) which performs the func- 
tion of raising a number to the given pow- 
er. To find the cube of a number—five, for 
example—you can enter PRINT 5 3, For 
the cube root, raise the number to the one- 
third power: PRINT 125 t (1/3). This 
function operates indirectly through loga- 
rithms, so you'll find that slight rounding 
errors are introduced. A 64 or 128 thinks 
that the cube root of 216 is not 6, but 
600000001, 

Your conversion factor for radians 
should work, But if you'd like a little more 
accuracy, multiply the measurement in 
radians by 180 and then divide by pi. The 
pi character (SHIFT-1) acts as a variable 
with a constant value of pi. To convert de- 
grees into radians, multiply by pi and di- 
vide by 180. 





Hi-Res Text 

Besides the CHAR command, is there 

any other way to print text to the bit- 

mapped graphics screen on the 128? 
Greg Bennett 


The CHAR command is probably the easi- 
est way to put text on the 128’s hi-res 
screen, but there are a couple of other 
techniques available. (See “Commodore 
128 Hi-Res Text Manipulation” in last 
month's issue.) 

You could store the shapes in a shape 
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table, a list of lines and circles that define 
the various characters of the alphabet. 
You might begin with a 100 X 100 grid 
and, for the letter X, decide to use a line 
from (0,0) to (95,95) and another line from 
(0,95) to (95,0). The numbers in parenthe- 
ses are x- and y-coordinates, 

The various lines and other shapes 
would have to be stored in an array in- 
dexed by the ASCII value of the character. 
To print a word like cat, you'd use MID$ 
to pick out each letter, use ASC to find its 
ASCII code, and then look up the shape. 
The DRAW and CIRCLE commands 
would put the characters on the screen. 
The advantage of using such a table is that 
you can easily scale the text. If you want- 
ed the characters to fit in an 8 X 12 grid, 
you'd just multiply the x-coordinate by 
.08 and the y-coordinate by .12. 

Another way to create your own cus- 
tom characters is to use GSHAPE and 
SSHAPE, which act as a sort of rubber- 
stamp function. First you'd create the 
character set (either with a drawing utili- 
ty or with the graphics commands). 
SSHAPE saves a portion of the hi-res 
screen into a string variable and GSHAPE 
copies the shape back to the screen. The 
characters wouldn't necessarily measure 
eight pixels by eight pixels; you could in- 
vent characters of almost any size, up to 
the limits of GSHAPE and SSHAPE. 
Again, you'd probably want to save the 
shapes in an array. 


Debugging Machine Language 

lam trying to write a machine language 
program that would allow me to SYS 
828 and change the screen and border 
colors, rather than use standard POKE 
commands. 

What I want the program to do is 
increment the border color every time I 
press the f1 key, increment the back- 
ground color when I press {3, and re- 
turn to BASIC when I press the left 
arrow. 

Here is a listing of what I've done 
so far: 


LDY 
STY 


#500 

$D020 ; border color 
$EFE4 ; get a key 
#885; compare to fl 
LOOP 


LOOP 


$D020 
SSF 
LOOP 


; left arrow 


Dennis E. Smith 


You've got the right idea, but there are a 
few mistakes which will prevent the pro- 
gram from running correctly. Let's start 
with GETIN, the Kernal routine for get- 
ting a keypress, located at $FFE4. The pro- 
gram increments the Y register (INY) to 
change the border color. But GETIN cor- 
rupts the Y register. The value in Y before 





JSR $FFE4 isn't guaranteed to be there 
when the computer returns, so your pro- 
gram may be storing some unknown value 
in $D020. Many of the Kernal routines af- 
fect the A, X, and Y registers, For a com- 
plete list of which routines affect which 
registers, see the Programmer's Refer- 
ence Guide. 

The following lines could be used to 
save the value of the Y register (TEMP is 
any free memory location); 

STY TEMP 
JSR $FFE4 
LDY TEMP 


For your purposes, you shouldn't 
have to bother with temporarily saving 
the Y register, however. A shorter way to 
accomplish the same thing (increment the 
border color) is to use the INC instruction: 
INC $D020. You don't need the Y regis- 
ter at all. 

A second problem occurs in the first 
BNE instruction. The three lines starting 
at the label LOOP check for a keypress, 
compare it to the f1 key, and branch back 
to the beginning of the loop if fl wasn't 
pressed. This loop repeats over and over 
until the user presses f1. So far, so good. 

A few lines down, the program 
checks to see if the left arrow is pressed. 
But remember, the only way to get past 
the BNE LOOP line was to press the f1 
key. By the time you're checking for the 
arrow key, it’s too late; the f1 key has al- 
ready been pressed. The first BNE instruc- 
tion should point forward to the next CMP 
instruction instead of branching back to 
get a key. If it's not the f1 key, then see if 
it’s the arrow key. 

The line CMP $5F contains a com- 
mon bug, one that’s often difficult to rec- 
ognize. It's comparing the value in the 
accumulator against the number in loca- 
tion $5F. What the program should be do- 
ing is CMP #$5F, comparing the actual 
value $5F, which is the ASCII value for 
the left-arrow key, The number sign (#) is 
important. 

The following program (for the 64 
only) performs the functions you described 
in your letter. Pressing f1 changes the bor- 
der color, and f3 changes the background. 
To exit the program and return to BASIC, 
press the left-arrow key above CTRL, 








LOOP JSR $FFE4 =; get key 
CMP #$85 ; is it fl key 
BNE NEXT 
INC $D020_ ; increment the 
border color 
NEXT CMP #§86 7 is it £3 
BNE NEXT2 
INC $D021_; increment the 
background 
color 
NEXT2 CMP #$5F ; is it left arrow 
BNE LOOP ot left arrow, 
get another 
key 
RTS 













The complete compiler 
and development pack- 
age. Speed up your pro- 







BASIC 
Compiler 


=(Gaseo> 


Give your BASIC programs the speed 
and performance they deserve 





code, compact p-code or, 
both, '128 version; 40 or 
80 column monitor output 
and FAST-mode opera- 
tion. 128 Compiler's ex- 
tensive 80-page pro- 
grammer's guide covers 
compiler directives and 
options, wo levels of 
optimization, memory usage, VO handling, 80 column hi-res graphics, fastor, 
higher precision math functions, speed and space saving tips, more, A great 
package that no software library should be without. 128 Compller $59.95 

64 Compiler $39.95 


For school or software 
development, Learn © on 
your Commodore with our in- 
depth tutorial. Compile C pro- 
grams into fast machine 
language, C-128 vorsion has 
added featuros: Unix™-liko 
operating system; 60K RAM 
or disk for fast editing and 
compiling Linker combines 
up to 10 modules; Combine 
MIL and C using CALL; 51K 
available for object code; 
Fast loading (8 sec, 1871, 18 sec. 1541); Two standard V/O librarys plus 
two additional librarios—math functions (sin, cos, sqrt, etc.) & 20+ graphic 
commands (lino, fll, dot, otc,). C128 $59.95 
C64 $59.95 

3] Now you can leam COBOL, 

the most widely used 
commercial programming 
language, on your 128 or 64. 
COBOL Compiler package 
comes complete with syntax- 
checking editor, intorproter 
and symbolic debugging 
aids, Now '128 version works 
with 40/80 column monitors 
and is faster than the ‘64 
version. C-64 $39.95 
New! C-128 $59.95 









Language 
Compiler 


On your 


per 


The language of the 80's and beyond 



























Speedterm-128 
Flexible, command driven terminal software package. 
Supports most modems for the C-128. Xmodem and Punter file 
transfer protocol. VT52 and VT100 terminal emulation with 
cursor keys, large 45K capture buffer and user definable 
function keys. C-128 $59.95 


Technical Analysis System for the C-64 $59.95 
Technical Analysis System for the C-128 Sept. ‘86 $59.95 
Ada Compiler for the C-64 $39.95 
VideoBasic Language for the C-64 $39.95 





Abacus 













faLrEseaee 
RPE 


seated 











Remarkably easy-to-use 
interactive drawing pack- 
age for accurate graphic 
designs. New dimension- 
ing features to create 
exact scaled output to all 
major dot-matrix printers. 
Enhanced version allows 
you to input via keyboard 
or high quality lightpen, 
‘Two graphic screens for 
COPYing from one to the 
other. DRAW, LINE, BOX, 
CIRCLE, ARC, ELLIPSE 
available. FILL objects 
with prosolected —PAT- 
TERNS; add TEXT; SAVE and RECALL dosigns to/from disk. Define your own 
library of symbols/objects with the easy-to-use OBJECT MANAGEMENT 
SYSTEM-siore up to 104 separate objects. G-128 $50.95 

64 $39.95 























Not just a compiler, but a 
complete systom for devolop- 
ing applications in Pascal 
with graphics and sound 
features, Extensive editor 
with search, replace, auto, 
ronumbor, etc, Standard J & 
W compiler that generates 
fast machina code. It you 
want to learn Pascal or to 
develop software using tho 
best tools available-SUPER 
Pascal is your first choice. 

C-64 $59.95 





Let your '128 or ‘64 speak Pascal 


OTHER TITLES AVAILABLE: 


Easily create professional high-quality charts and graphs 
without programming. Immediately change the scaling, 
labeling, axis, bar filling, etc. to suit your needs. Accepts data 
from CalcResult and MultiPlan. ‘128 version has 3X the 
resolution of the '64 version. C-128 $39.95 
C-64 $39.95 
Personal Portfolio Manager 
Complete portfolio management system for the individual or 
professional investor. Easily manage your portfolios, obtain 
up-to-the-minute quotes and news, and perform selected 
analysis. Enter quotes manually or automatically through 
Warmer Computer Systems. Oct. ‘86 C-128 $59.95 
C-64 $39.95 
Xper 

XPER is the first "expert system” for the C-128 and C-64, While 
ordinary data base systems are good for reproducing facts, 
XPER can derive knowledge from a mountain of facts and help 
you make expert decisions. Large capacity. Complete with 
editing and reporting. C-64 $59.95 
Commodore 64® and Commodore 128™ are trademarks of Commodore Electronics, Lta. 
Unix™ is a trademark of Boll Laboratorios. 


Software 


P.0. Box 7219 Dept. GA Grand Rapids, Ml 49510 - Telex 709-101 - Phone (616) 241-5510 


Call now for the name of your nearest dealer. Or to order directly by credit card, MC, AMEX of VISA call (616) 
241-5510. Other software and books are available-Call and ask for your free catalog. Add $4.00 for shipping 
per order. Foreign orders add $12.00 per item. Dealer inquires welcome—1400+ nationwide. 





Nigel Shepherd 


General Manager Of Commodore North America 


For more than nine months, Nigel 
Shepherd has headed all Commodore 
operations in the United States and 
Canada, a period of both ups and 
downs for the West Chester, Pennsyl- 
vania-based computer company. But 
Shepherd is no newcomer to the Com- 
modore fold. For the seven years pre- 
ceding 1986, he was the highly 
successful general manager of Com- 
modore Australia, with responsibility 
for the international company’s busi- 
ness in Australia and Southeast Asia. 
Born and educated in Scotland, Shep- 
herd joined Commodore Australia 
after serving as general manager of 
marketing for Bell & Howell in 
Australia. 

With extensive background in 
the sales and marketing of both busi- 
ness systems and personal computers, 
Shepherd has had a crucial role this 
year in helping Commodore's presi- 
dent, Thomas Rattigan, weather 
tough financial problems, sizeable 
employee layoffs, slow-starting 
Amiga sales, and other corporate set- 
backs, At the same time, he’s had a 
hand in promoting the very successful 
Commodore 128 computer and the 
continuously phenomenal Commo- 
dore 64 in its new 64C incarnation. 
Those who've met and worked with 
him describe Shepherd as both knowl- 
edgeable and candid, with a good 
sense of humor. 

When COMPUTE!’s GAZETTE 
spoke with Shepherd, Commodore 
had recently announced that 128 
sales were over the 600,000 mark. The 
new 64C, a recased 64 bundled with 
the icon-based GEOS operating sys- 
tem and QuantumLink telecommuni- 
cations software, had been on the 
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Selby Bateman, Features Editor 


market just over a month. And Com- 
modore officials, including Shepherd, 
were optimistic about increased sales 
of the Amiga during the third and 
fourth quarters of 1986. 


Gazette: As far as you can tell at 
this point, what’s been the initial 
response to the new 64C among 
consumers and retailers? 


Shepherd: I think that there’s prob- 
ably a two-step answer to that. If 
you go back perhaps two and a half 
to three months ago [April and 
May], when we were first talking 
about a restyled Commodore 64, I 
think that they were fairly blasé 
about it. It was almost a so-what 
type attitude. Even though we did 
talk to them about packing in with 
that both GEOS and QuantumLink, 
there was a fair degree of cynicism. 
And then, of course, as you're prob- 
ably aware, we increased the price 
of that product. 

From that until today, we've 
had a fairly universal acceptance 
now of the higher price. That earlier 
degree of cynicism is turned into 
something very positive. I think 
we've had a very positive response 
to GEOS and to QuantumLink. 


Gazette: When did the units first 
begin to be available? 


Shepherd: We started shipping 
them right in the middle of June. 


Gazette: Have you received any 
major indication of how things are 
moving? 


Shepherd: We certainly had a posi- 
tive response from our customers in 


terms of buying them in. It’s proba- 
bly too early to say how well 
they're selling out to the consumer 
because these same customers [re- 
tailers], of course—at least some of 
them—were still sitting on some 
stocks of the previous 64. And, of 
course, they’d be clearing them out 
first. 

Certainly, in things like shows 
where we've exposed it, we've had 
people come to us and say, “Hey, 
can we only buy the case because 
we've got a 64?” [Laughs.] And 
“We'd love to swap cases,” and that 
type of thing. 

So, in terms of appearance, it’s 
being well accepted. And the GEOS 
thing, I think most people see that 
as extending the 64’s capabilities 
beyond what they originally 
thought they could do, 


Gazette: Have you had any diffi- 
culty getting retailers to understand 
what GEOS is, and what it poten- 
tially offers? 


Shepherd: That's a bit of a 50/50. 1 
guess, to be quite frank, we don’t 
necessarily expect the individual 
guy behind the counter at [a mass 
market retailer] to realize the impli- 
cations of GEOS. 

However, even these major 
outlets—a buyer—you know, 
we've taken the time and the effort 
to explain the implications of GEOS 
to them. And the buyers have been 
very positive about it. And they cer- 
tainly see it being plus-value for the 
64. 

We've also had a pretty good 
response from industry magazines 
who, again, were a little bit like our 


Commodore's head of North American 
operations talks to the Gazette about the 
new 64C, GEOS, memory expansion for 
the 64, QuantumLink, prospects for the 
Amiga computer, and the company’s 


customers, who initially started off 
with a fair degree of cynicism, say- 
ing we're putting a new look on the 
venerable Commodore 64. But I 
think most of the industry analo- 
gies of GEOS, the ones I’ve seen so 
far, have been very positive. 


Gazette: What were the deciding 
elements in your decision, and 
Commodore’s decision, to bundle 
GEOS with the 64C and to come out 
with a recased 64? 


Shepherd: First, in terms of the re- 
case—because that was really de- 
cided before the GEOS exercises— 
when we produced the 128, we felt 
that the 64, being that certainly it 
was a machine that was four-and-a- 
half years old—it needed a bit up- 
dating. What was a good-looking 
machine four years ago wasn’t nec- 
essarily a good-looking machine to- 
day. We decided that there should 
be in appearance more synergy be- 
tween the 64 and the 128, Previous- 
ly, of course, there were different 
colors and different shapes. We 
were looking for a synergy so that 
also, with accessories, it would be 
possible to mix and match disk 
drives and printers, And whether 
you had a 64 system or a 128 sys- 
tem, you would have a color 
coordination. 

So that was part of it. The new 
64 case doesn’t cost us any more, 
nor does it cost us any less. So there 
wasn’t any savings in that area. It 
was really a question of styling. 
Some people do want to put a 1571 
disk drive on a 64 for example, or 
an MPS-1000 printer or an 803 





financial situation. 
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printer on a 128. So we felt that 
synergy would do something for us 
in terms of appearance, in terms of 
display. So that was the major rea- 
son for the new-look 64. 


Gazette: How about for GEOS it- 
self? That was a decision made after 
the case. How did that come about? 


Shepherd: That was developed, of 
course, by Berkeley Softworks. And 
they came to us initially with it as 
an alternative operating system 
that they intended to market them- 
selves. The more we looked at that, 
we saw that as being a fairly sub- 
stantial offering for the 64. And we 
felt that, with the Commodore 64, if 
we could encourage software 
houses to put a front-end on the 
programs for GEOS, we could offer 
on the 64 icons and a mouse capa- 
bility for the price of under $200 for 
the CPU. That was something sub- 
stantial. So our decision to bundle it 
was really aimed at convincing the 
software community out here, 
“Look, there are substantial vol- 
umes of GEOS out there.” And peo- 
ple would understand what GEOS 
was and that it would certainly be 
in the best interest of the software 
community to put an interface on 
the software for GEOS. 

So that was the decision. We 
saw it as revitalizing the Commo- 
dore 64. It doesn’t replace the Com- 
modore 64 operating system, 
because you wouldn’t put a GEOS 
front-end on games, for example— 
there’s no advantage. 

We saw people who wanted to 
get access to the current 64 operat- 
ing system; of course, they still can 
do that. But we can transform the 
64 with greater capabilities, specifi- 
cally in graphics and productivity, 
than it had previously. 


Gazette: GEOS is now on disk. Any 
chance that it will be put on a ROM 
chip in the future? 


Shepherd: Not at this stage. It’s a 
fairly common question. It’s some- 
thing at this stage that we haven't 
looked at. As I understand it, the 
only way to do it with the current 
board layer—but, of course, that 
could be changed—was really to 
supplant the 64 operating system 
with the GEOS operating system. 
And we think at this stage, we just 
couldn’t sacrifice the operating 
system. 
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Gazette: You had mentioned that at 
first you received—if not negative 
reactions—at least some raised eye- 
brows about the price. How is that 
working out? 


Shepherd: That's basically totally 
dissipated. Sure, there’s a strong 
argument to say that if the street 
price for the 64 goes from $159 to 
about $199, that there has to be 
some form of pro rata fewer pur- 
chases. Fewer people can afford 
$199 than $159. It’s still early to 
say, but that doesn’t look as if that’s 
going to materialize. 


“We're looking 
at...RAM expansion 
capability on the 
64, which can be 
accessed through 


GEOS...at the 128- 
mode version of 


GEOS.” 


Our research—and we did 
considerable research on this, not 
only on GEOS, but on the pricing— 
indicated to us that people who at 
this stage don’t have a home com- 
puter, but in the back of their mind 
thought, “One of these days I’m go- 
ing to get a home computer, and it’s 
going to be good for the kids’”— 
when we ran that survey, they indi- 
cated they thought a decent home 
computer would cost about a thou- 
sand dollars. Now sure, they didn’t 
always segregate that into a CPU 
[central processing unit], a disk 
drive, and a printer. At the end of 
that research, when we said, “Hey, 
the 64 has a street price of $199; 
you get a disk drive for approxi- 








mately the same price,” they were a 
bit surprised, So I think the people 
who were going to buy a fortnight 
ago were the people who were con- 
scious of $159. The people who are 
going to buy for the rest of this year, 
I don’t think are really alert to the 
fact that the price has been in- 
creased, They just look at what's 
value for money. 

And I think the other thing is 
that the retailers have never seen 
Commodore increase prices for 
something like five years. So, it was 
mind-boggling [Laughs]. They nev- 
er thought they‘d see the day Com- 
modore would increase prices. 


Gazette: We understand that there'll 
soon be a 128 version of GEOS. 
When might that be available? And 
we assume that it won't be in ROM 
either. 


Shepherd: The 128 version of 
GEOS just now is approximately 
three months.The reason I say ap- 
proximately is that we've got a 
number of things we're looking at 
with GEOS. We're looking at the 
possibility of putting a RAM expan- 
sion capability on the 64, which can 
be accessed through GEOS. We're 
looking at the 128-mode version of 
GEOS. Now what we have to deter- 
mine as a company is what our pri- 
orities are. And indicate to Berkeley 
Softworks that we want the inter- 
face to the RAM disk first, or we 
want the 128 mode. 

We don’t see it really as being 
as crucial for the 128 inasmuch as 
the 128 already has 80-column ca- 
pability. So it doesn’t need GEOS to 
give it that. You can use the 64 ver- 
sion of GEOS on the 128, anyway, 
in 64 mode. 

Nevertheless, to directly an- 
swer your question, you're looking 
roughly at three to four months 
from now [October-November]—a 
128-mode version of GEOS. 


Gazette: So the emphasis right now 
is memory expansion capability for 
the 64 through the interface from 
Berkeley. 


Shepherd: It’s that. It’s also liaison 
with other software houses in terms 
of encouraging them to put GEOS 
on the front-end of their software. 


Gazette: Do you have any idea 
when the memory expansion might 
be available for the 64? 
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Shepherd: That is, at this stage, a 
September or October product. 


Gazette: What have been the soft- 
ware publishers’ responses to de- 
veloping under GEOS? 


Shepherd: The software publishers 
who are primarily interested in pro- 
ductivity software have been very 
encouraged by GEOS because to 
them, they see it almost as a second 
market. 

They've already sold into the 
installed base word processors, da- 
tabases, and spreadsheets. They're 
encouraged by the fact that apart 
from the new market out there, 
which they would have access to 
anyway, they believe that the im- 
plication is that GEOS is sufficiently 
strong for people who currently 
have word processing or other 
types of productivity software to 
buy a new version with GEOS capa- 
bilities, Whereas before they may 
have not been encouraged or en- 
ticed to buy new software. They 
think there are sufficient additional 
attributes offered by GEOS to en- 
courage the people who’re out 
there just now quite happily using 
some of that software to say, “Hey, 
I'll buy a new bit of software with 
the GEOS capabilities,” So to them, 
it increases their overall market. 


Gazette: Has Commodore stopped 
making the old 64 in favor of the 
new 64C with the case? 


Shepherd: Yes, we have. 


Gazette: When were the last old- 
style 64s produced? 


Shepherd: Well, we really cut them 
out. There was a small overlap of 
no more than a week in the middle 
of June. So, up to about halfway 
through June we shipped out the 
last of the old 64s, and then cut 
over, virtually overnight, straight 
onto the new machines. 


Gazette: So, there was really no 
downtime as far as production of 
64s is concerned? 


Shepherd: No, none at all. 


Gazette: What's the status of 64C 
availability now and into the 
Christmas season? Will you have 
enough units to meet expected 
demand? 


Shepherd: We don’t see any prob- 
lem at all. We did, but it was purely 
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a temporary thing. And I guess, be- 
cause of the pent-up demand, we 
totally sold out of the Commodore 
64Cs by the end of June. 

And we'll be steadily produc- 
ing that machine right through 
Christmas, so we don’t see a real 
problem with supply and demand. 


Gazette: Commodore obviously 
views the QuantumLink telecom- 
munications system as an impor- 
tant aspect of the marketing of the 
64C. Do you have any idea how 
many subscribers there are, or how 
many you would ultimately like to 
target with this kind of system? 


“|..software 
publishers who are 
primarily interested 
in productivity 
software have been 
very encouraged by 
GEOS because 

.. they see it as a 
second market.” 


Shepherd: In terms of Quantum- 
Link? 


Gazette: Yes. 


Shepherd: Well, I guess it’s their 
target more than ours, although we 
obviously benefit. The degree is an 
intangible. I guess we'll never 
know totally the answer to “Did 
you buy the Commodore 64 for it- 
self; did you buy it for GEOS; did 
you buy it for QuantumLink?”’ 
We'll never have a tangible answer 
to that, but I think there’s the possi- 
bility that we'll be looking at some- 
where close to one in every ten 
purchasers of the 64 actually going 
ahead and utilizing QuantumLink. 


Gazette: Does Commodore plan 
any arrangements similar to this 





with other telecommunications 
services? 


Shepherd: This is the primary one 
in terms of what QuantumLink of- 
fers us, It doesn’t preclude us, how- 
ever, from getting involved with 
other telecommunications services. 
So, there’s an opportunity that’s a 
mutual one in terms of assisting 
them in terms of subscribers, but us 
believing that it also helps us to sell 
more Commodore machines, We'll 
certainly look at that case by case. 


Gazette: How do sales of the 64C 
have an impact on sales of the 128? 
Is there an overlap or are they in 
different market niches? 


Shepherd: There’s a definite over- 
lap, which is sort of for and against. 
There’s a number of 64 owners— 
we estimate possibly 20 to 25 per- 
cent of 128 purchasers are people 
upgrading from a 64, The reason for 
that, I guess, is that these people 
have invested quite a bit of money 
in disk drive, printer, monitor, soft- 
ware, and when they transfer 
across to the 128, they can keep the 
disk drive, keep the printer, and 
keep the software, And slowly but 
surely they‘re buying a 128 disk 
drive or buying a printer, But their 
up-front expense, really, is only for 
the CPU, 

So, on the one hand we expect 
that to continue—that there will 
still be people upgrading from the 
64 to the 128, On the other hand, 
because we're essentially making 
the 64 a more powerful machine, 
then that presents some opposition 
to the 128. If you say, “Why would 
somebody buy a 128 rather than a 
64?” I guess there are several rea- 
sons. The CP/M mode—and that’s 
stronger than most people think. If 
you look at a lot of what's going on 
on the telecommunications services 
on the 128, you'll find a healthy re- 
port going back and forth on 
CP/M. But, I guess the major rea- 
son is to get access to 80-column 
and productivity software. That's 
offset to a degree, of course, by 
what we're doing with GEOS. 

There’s a definite overlap. I 
guess it gets down to how much 
money someone is prepared to 
invest. 


Gazette: At the Summer Consumer 
Electronics Show (CES), Commo- 
dore announced that more than 
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An Outliner Processor that quickly 
organizes facts and ideas in outline 
format. 


With Timeworks you get more 
than software. .. 


You Get Our Customer Technical 


Support Team —free to all registered users. 





More power for your dollar 


Timeworks, Inc., 444 Lake Cook Road, Deerfield, Illinois 60015 


312-948-9200 


* Offer expires 90 days after date of original purchase, 


*** COMMODORE 128 is a trademark of Commodore Electronics, Lid. 


© 1983 Timeworks, inc. All Rights Reserved. 


up to 64 pages (4,096 characters) per 
record. 


With Timeworks you get our Money 
Back Guarantee* 

Ifyou can find anything that works better for 
you—andit's available — we'll buy it for you. 
Details inside every Timeworks package.** 


$69.95 each 


TO ORDER CALL: 
1-800-535-9497 





analysis functions. 
Speed Keys e SwiftSort ¢ SwiftDOS 


You Get Our Liberal Upgrade and 





Exchange Policy — Details are inside every, 


For the Commodore 128™ Computer*** 
Suggested Retail List Price: 


Available now at your favorite 
dealer, or call Timeworks 


Timeworks package. 










600,000 128s have been sold. Any 
estimates as far as the number of 
128s out there by the end of the 
year? 


Shepherd: That was a worldwide 
figure, that 600,000. That would 
have been up to, roughly, the end 
of April or maybe closer to the end 
of May. And that did include our 
launch in the selling period. Up to 
the end of the year, I think we'd 
have to be fairly close to the million 
mark worldwide. 


Gazette: How many just in North 
America? 


Shepherd: Roughly, it’s about 
50/50. We split right down the 
middle—50 percent North America 
and 50 percent the rest of the world. 
So, you'd be talking about 500,000 
in North America. 


Gazette: What's the biggest 128 
market outside the U.S. and 
Canada? 


Shepherd: Most definitely, that 
would be Germany; the European 
market, in general, but specifically 
Germany. 


Gazette: Commodore has received 
a great deal of press during the past 
six months relating to the compa- 
ny’s financial situation. You’ve 
done some belt-tightening. How do 
things look for the rest of 1986 and 
into 1987 for Commodore? 


Shepherd: One of the reasons for 
the cynicism out there is that Com- 
modore has over the last six months 
had a couple of false starts in terms 
of “We're climbing out of it; you're 
going to see a change,” and then re- 
versing our position. We did, at the 
end of the March quarter, indicate 
that we thought that expenses were 
under control to the extent that in 
the June quarter we'd be near a 
break-even situation. And that 
we'd return to profitability in the 
September quarter. All the June re- 
sults are not in yet, and probably 
won't be for a couple of weeks. I'd 
say at this stage, we expect to be 
very close to a break-even at the 
June quarter. Whether that is plus 
or minus one percent or two per- 
cent, we don’t know yet. 

We think we'll break even at 
the June quarter, and that we will, 
in fact, be profitable for the second 
half of this year. 
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Gazette: Is that a function of 64 and 
128 sales more than Amiga sales at 
this point? 


Shepherd: It’s really a combina- 
tion. As I indicated, with the 64 we 
increased prices. We needed the ex- 
tra margin. So, it’s a combination of 
64 and 128 sales; Amiga sales, while 
certainly not mind-boggling—we 
wouldn’t try and pretend they 
were—they’re steadier now. It’s a 
combination of that, and cost re- 
ducing. There’s a whole lot of fac- 
tors that go into that total pie. 


“We have our 
expenses under 
control to the 
extent that we can 
run the business 
profitably from 
here on in.” 


Gazette: So, as a company that has 
pared down the total number of 
employees and undertaken other 
belt-tightening measures, is the 
cost effectiveness better for Com- 
modore during the next six months 
to a year? 


Shepherd: Most definitely. I mean, 
we have gone through considerable 
pain to get it there. We're confident 
that there are no more sudden sur- 
prises. We have our expenses under 
control to the extent that we can run 
the business profitably from here 
on in. 


Gazette: What's your estimate on 
unit sales of the Amiga now, and by 
the end of the year? 


Shepherd: First, and I guess I’m al- 
most in a defensive mood here, the 
reason for that is that the Amiga 
has been sold only in North Ameri- 
ca up to the middle of June. It was 





only launched in Europe—really 
they only got the first shipment 
about halfway through June. One 
of the reasons, when I say I’m de- 
fensive on that, is that everytime 
somebody looks at Amiga figures, 
they never qualify it by saying it’s 
only in North America. 

So now, on Amigas, we’re 
looking roughly at a run rate of 
10,000 to 15,000 a month ona 
worldwide basis. 


Gazette: Any estimates of what the 
total will be by the end of the year? 
Or is that too difficult at this point 
to say? 


Shepherd: It's too difficult. One of 
the things is that, we’re committed 
to going out publicly and saying 
that. In fact, we've got some people 
in Europe just now and we feel that, 
whether that’s good news, medio- 
cre news, or bad news, that we have 
to come out with a statement that 
indicates the installed base of the 
Amiga computers and the run-rate 
we expect for the rest of the year. 
There’s no sense in us being bullish 
and loving to quote our 64 and 128 
figures, and hiding from Amiga fig- 
ures. So, in the next couple of 
weeks, we should have all these fig- 
ures together, and we'd be quite 
happy to give them out. 


Gazette: There have been some 
press reports that the Amiga would 
be maintained in a vertical market 
rather than in a more broadly based 
market. Could you comment on 
those reports, and do you see the 
Amiga as a consumer machine? 


Shepherd: | think to a degree there 
was a bit of misquoting [in those re- 
ports]. I certainly said in a couple of 
interviews that apart from some 
software development that’s taking 
place, we'd have additional mar- 
kets which would be in the vertical 
market areas. Not at the expense of 
the broad market. 

We see ourselves in vertical 
markets—I don’t know if you'd call 
desktop publishing a vertical mar- 
ket; that’s probably a horizontal 
market. We see ourselves entering 
the desktop publishing market. We 
see ourselves in the graphics mar- 
ket, in the illustrators’ market, 
using some things like the Gen- 
locks and the Frame Grabbers, in 
addition to the broad base of Amiga 
buyers. 


So, I think what you're going 
to see is the Amiga continue to be 
acceptable to the hobbyist, who's 
after the technology more than 
anything else, who’s, I guess, in the 
higher income bracket for expen- 
sive home machines. And I can see 
them getting into the corporate 
market, not so much as an alterna- 
tive to, let’s say, corporate Ameri- 
ca’s PC market; but in the corporate 
markets where the Amiga has capa- 
bilities that the PC doesn’t have— 
that use the Amiga’s graphics and 
color and sound capabilities, 

So, yes, I’ve noticed that my- 
self—(the reports) that Commo- 
dore’s thrust was more into vertical 
markets. I think what we're saying 
is that there’s an additional thrust 
going into vertical markets. 


Gazette: Many people would like 
to see Commodore lower the price 
and make the Amiga competitive 
with the Atari ST and the PC clones 
by the end of this year, Or, on the 
other hand, have a different version 
of the Amiga at more of a mass- 
market level. Is either of those a 
possibility? 





Shepherd: Well, I'd say that both 
are. When you come up with a base 
product, like the Amiga 1000, in 
terms of future development, we do 
two things: We look at cost reduc- 
tion and we look at product en- 
hancement. It’s very difficult to do 
both, Sometimes it’s an either/or: 
How can you enhance the product, 
but get some cost out of it. 

So, we're certainly looking at 
just how we can cost-reduce the 
Amiga. And we're also looking at a 
more powerful Amiga. Neither of 
these would you see this year. And 
we haven't pushed the button on 
one or both of them. Certainly, our 
target in 1987 is to have an en- 
hanced Amiga, and if possible— 
and it may be a separate machine— 
also to have a lower-cost Amiga. 


Gazette: One last question. Some 
third-party software developers 
have told us that the 64C, and the 
large installed base of the 64, and 
sales of the 128 mean that their 
commitment to that market could 
be for at least another three years— 
and that it’s open-ended after that. 
What's Commodore’s view on 
commitment to the 64 and 128? 


Have your C-128* look 


as ane as 
it works... 


with the Command Center, a space 


saving cabinet specially designed for the 


C-128 Personal Computer System. Just: 


install your keyboard and disk drives, set 


your CRT on top, and you've got 


Commodore value with the look of a much 


more expensive system. 


It will untangle your wires and unclutter 


your desk. And look at all it includes: 


@ Built-in AC Power Strip with surge 


protection and line noise filtering. 


@ Built-in Drive/CPU Cooling Fan. 


™@ Phone/Modem 
telecommunications switch, 
@ Master A.C. Switch with power 
indicator light. 
Free 30-day trial offer and one year 
warranty, Order your Command Center 
today. Write: KETEK, P.O. Box 203, 
Oakdale, IA 52319. 


Also available in a one drive configuration 


For faster service, call 
1-800-626-4582 toll-free. 
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Shepherd: Essentially, they both 
come from the same operating sys- 
tem. And the 128 certainly has en- 
hancements on that. 

We believe that the 64 and 128 
product line certainly goes into 
1988. I think we'd be naive to say 
that we'd be selling them in 1990. If 
we'd be selling them four years 
from now, they would need contin- 
ued enhancements, It’s quite possi- 
ble. Two years ago, we never 
thought and neither did anybody 
else, that something like GEOS 
would come along. There are things 
that we’re now capable of doing 
technology-wise that two years ago 
we didn’t think we were capable of 
doing on the 64. 

So, that basic 64 product line— 
and I include the 128 in that—we 
think lends itself to additional de- 
velopment. And we’d certainly see 
it through 1988, I’m not going to 
quote our friend from Apple who 
said that suddenly the Apple II is 
the machine of the 1990s [laughs]. 

But, yes, you’re looking at a 
solid two to three years out of that 
[64 and 128] machine. 

@ 
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Educational 
Software 


Selby Bateman, Features Editor 


One of the toughest challenges faced by any software company 
is developing educational computer programs that can be simul- 
taneously effective, engaging, and useful in the home and class- 
room. In addition, there have been too many companies chasing 
too few buyers, which has resulted in an industry shakeout 
among educational software producers. And yet, some companies 
have survived and are doing well by carefully targeting their 
customers and understanding what kinds of programs are 
needed in homes and schools. For Commodore owners, the result 
is a growing supply of good educational programs. 


When purchasers of the new Commodore 
64C computer open the package, one of 
the first things they'll find is an educa- 
tional software program named Odell 
Lake, created by MECC, the Minnesota 
Educational Computing Corporation. 
MECC is no newcomer to educational 
software, although home computer users 
may be less familiar with the company 
than those in education. The company 
was started in 1973, which is almost 
ancient history in microcomputer circles. 
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And since that time, MECC has estab- 
lished a solid reputation in schools across 
the country. 

But this does mark the first time that 
Commodore has chosen to bundle an 
educational program with one of its com- 
puters. MECC’s involvement and Commo- 
dore’s effort both say a lot about many 
people’s perception of the 64 as an inex- 
pensive and versatile learning machine for 
both classroom and home environments. 

Now, with Odell Lake and selected 
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If you own a C-64, you 
The one you purchased. And the 


GEOS realizes the technical GEOS can be divided into 4 areas: two 
potential that has been in the functional aspects (deskTop and Desk 
C-64 all along. Speed. Accessories), and two major applications 
Power. Ease of use. Sophisti- (geoPaint and geoWrite). 


cation. Elegant, practical 

applications you might 
expect of a high-end personal computer, all 
made possible with GEOS. It's so simple— 







deskTop. deskTop is a 
graphic interface, making file 
organization and manage- 
ment easy. As always, you 


but then, so was fire. Once it caught on. call the shots. Load a disk. 

’ = Files appear as icons on the 
To begin at the beginning. GEOS stands for disk notepad; to flip through, point at the 
GRAPHIC ENVIRONMENT OPERATING folded corner and click. Prefer a file appear 
SYSTEM. Why? on a different sheet? Move it. It's easy. 


GRAPHIC: Because menus and icons 
replace long, typed command lines. Point 
and click, that's it. 

ENVIRONMENT: Because GEOS provides 
a consistent, powerful way to use your 
computer. Learning new applications is a 
snap (or should we say click). 
OPERATING SYSTEM: Because GEOS 
orchestrates every function so that they all 
work together systematically, 

even symphonically. 


Some basics. Icons are graphic images 
which represent files or utilities. Each is 
different, and all are easy to recognize and 
easy to use. 

A menu is just that: a list of functions availa- 
ble for selection. When a menu appears, 
move the pointer to any item you wish. 
Click. Click. You're on your way. 


Create a new document or re-name an 
existing one. Want to copy a file onto the 
same or a different disk? Fine. Forgotten 
what a file contains? Select “get info” from 
the file menu. A description of that file's 
contents appears. Finished with a file? Print 


A pointer is used to select and activate it. Save it. Or drop it in the trash and have 
items. To move the pointer, pol the moves done with it. Your call. 

or trackball or rotate the joystick. Once on fr 

target, click once to select; click a second Cae eral 
HAUS ERWEID, your fingertips. The pointer 
Fonts are a new way of looking at text. operates any one of the 
Choose from 5 different fonts (with more on . fourteen graphic tools and 
the way). Try Dwinelle, or Roma, bold, or shapes in the drawing menu. 
italics, even underline and «\u"linw. Need to Create masterpieces on the Drawing 

fit more words on a line? Pick a smaller Window. By turns, use a pencil, an airbrush 
point size, like uniersiyépom, and get over one or a paint brush, each with a character all its 
hundred characters per line. own. Draw straight lines, squares, rectang- 
All this and fast too. Because the integrated les or circles. Fill in with any of the 32 
diskTurbo software improves 1541 disk drive patterns. Switch to pixel-mode, where each 
performance 5 to 7 times. That's right. On dot in a selected section is magnified many 


both reads and writes. times its size for easy manipulation. 


own two Machines. 
personal computer GEOS" unlocks. 





Second thoughts? Erase what you don't 
want. Or “UNDO" your last act. (If only life 
could imitate art!) 

Add text if you like, in different fonts, styles 
or point sizes. Even change its position or 
layout at will. 


Move or copy any part of your creation. 
Once done, you can include your artwork in 
another document—a letter home perhaps. 
(Won't Mother be pleased?) GEOS makes 
it easy. 


Fonts are afew way of ookiig at tent Choose 
from S oF them (with more on the way) Tey 
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geoWrite. An easy to use, 
“what you see is what you 
get” word processor. Create 
documents. Insert, copy, 
move or delete text as you 
wish. Choose from 5 different 
fonts in in many different styles and point 
sizes. Preview your page exactly as it will 





appear off the printer. Typists will appreciate 
tabs, word-wrap and page breaks. 
Documents may contain up to 64 pages. 
What's more, you can move to any page 
instantly. If you like, you can cut selected 
text from one section and move or copy it to 
another. Add graphics from geoPaint. 

It's a cinch. 
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y Desk Accessories. Handy 
programs you can use while 
} in any GEOS application. 
These include an alarm 
clock, a notepad for 
reminders, a four-function 
calculator, and photo and text albums which 
store pictures and phrases you may then 
paste into applications. The Preference 
Manager even lets you establish parameters 
for everything from mouse speed to the 
date and time—even background color. 
Civilized options, every one. 
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GEOS, A Whole New World 
for the C-64. 


$59.95 TO ORDER: 800-443-0100 x234 

GEOS Diskette includes deskTop, diskTurbo, gooPaint, geoMrite and desk 
‘Accessories $59.95. x 

CA residents add 6.5% tax. ($4,50 USI7.50 Foreign shipping and handling.) 

US Funds only. B.S.W Order Processing, PO Box 57135, Hayward, CA 94545, 
‘Commodore 64 and C-64 are trademarks of Commodore Electronics, Ltd. GEOS, 
deskTop, gooPaint, geoWhito, diskTurbo and Berkeley Softworks are trademarks of 
Berkoloy Softworks, 





titles from MECC’s software line, 
home users will increasingly be ex- 
posed to the company’s products. 
This movement from the school 
market to the home user is only one 
example of the ways in which edu- 
cational software companies are at- 
tempting to bridge the gap between 
the two markets—home and school. 

A reverse trend is occurring 
with some other educational soft- 
ware companies such as CBS Inter- 
active Learning. Previously known 
as CBS Software, the new Interac- 
tive Learning group has recently 
been concentrating more on sales to 
the education market than to home 
users, And the result, say represen- 
tatives for both CBS and MECC, 
has been effective in different ways. 

Both attempts rest on the pre- 
mise that there is common ground 
between school and home for edu- 
cational software, and that the right 
products and the right packaging 
can have an impact in both arenas. 

“The home market comple- 
ments the education market,” says 
Dr. Richard Pollock, MECC’s direc- 
tor of special projects. Pollock also 
believes that having more knowl- 
edgeable purchasers in the home 
and school markets is today provid- 
ing a more discriminating consumer 
base for good educational software. 

And, as he says, “The software 
itself is becoming more sophisticat- 
ed and closer to the way teachers 
teach. Before now, teachers had to 
adapt to the way a program 
worked,” 

For MECC, the approach to the 
home computer market has been a 
slow, but steady progression. For 
the past three years, MECC has had 
Commodore products available— 
some 30 in all now. But only recent- 
ly has the company worked directly 
with Commodore to provide a se- 
ries of educational programs for the 
home market. The first of these, 
Odell Lake, is free with the 64C. 
Eight more titles, all in the young- 
learning area, are now available 
through Commodore, MECC also 
provides a free catalog of its entire 
product line to anyone who would 
like more information. 

While CBS has had a very large 
presence in the home computer mar- 
ket over the past several years, one 
of the most successful areas of their 
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business has turned out to be the 
school market, says Marylyn Ro- 
senblum, director of sales and mar- 
keting for CBS Interactive Learning. 

“Like lots of other people, we 
realized at some point that the con- 
sumer market wasn’t going to live 
up to the expectations or the invest- 
ment we had made. But at the same 
time, we had, almost without 
knowing it, a lovely small, profit- 
able business selling some of our 
software to schools. 

“Because CBS is very heavily 
involved in the educational market, 
it looked to people here like it would 
make sense to take what we had—a 
very valuable body of products— 
and focus on the area where we 
could realize a significant return. 
That's what really started us turning 





toward the education market.” 

The marketing considerations 
confronted by both of these compa- 
nies are being repeated across nu- 
merous other software producers. 
And the net result has been that al- 
most all of the successful software 
companies producing educational 
programs have been carefully, and 
usually quite cautiously, exploring 
both sides of the street-—home and 
school. 

Literally hundreds of educa- 
tional software programs are avail- 
able for the Commodore 64, 
developed during a period of over 
four years, While a compilation of 
all this software would be impossi- 
ble to fit into one article, there is a 
variety of new programs that can 
help teachers, parents, and serious 
students get a flavor of the mixture 
of approaches being taken. The 
products and companies included 
below provide an overview of some 
of the newer educational software 
packages you'll find available for 
your Commodore computer. 

American Educational Com- 
puter: AEC continues to offer an 
extensive line of curriculum-based 
software for many computers. Some 
of the newer Commodore programs 
available offer education in the 
areas of spelling, phonics, reading, 
vocabulary, grammar, Spanish, 
French, U.S. and world geography 
and history, and U.S, government. 
(American Educational Computer, 
801 N.W. 63rd St., Oklahoma City, 
OK 73116) 

Arrakis Technologies: A new 
marketing arrangement for Arrakis 
software is making several of the 
company’s curriculum-based pack- 
ages available in Commodore ver- 
sions. Already well known in the 
schools, Arrakis has more than a 
dozen curriculum-oriented educa- 
tion programs for Commodore 
computers. The products, all aimed 
at grades 7-12 in a variety of sub- 
ject areas, have recently begun to 
be distributed in the United States 
by the Webster Division of McGraw- 
Hill, and in Canada by Grolier Elec- 
tronic Publishing. The school- 
oriented packages include algebra, 
trigonometry, statistics, physics, 
chemistry, biology, and other cur- 
ticulum-based topics. (Computer 
Marketing, Webster Division, 28th 


Floor, McGraw-Hill, 1221 Avenue 
of the Americas, New York, NY 
10020, or Grolier Electronic Pub- 
lishing, 95 Madison Ave., New 
York, NY 10016) 

BCI Software: During the past 
year, low-cost educational software 
from BCI has become available, in- 
cluding a variety of Commodore 
education programs in the areas of 
mathematics, English-Spanish vo- 
cabulary, science, history, and ge- 
ography, covering grades one 
through ten. (BCI Software, P.O. 
Box 730, Ringwood, NJ 07456) 

Broderbund: Broderbund’s 
bestselling Print Shop has recently 
spawned both the Print Shop Com- 
panion and Print Shop Graphic Li- 
braries for the Commodore 64, 
These programs are popular in the 
school and home as hands-on in- 
troductions to creating cards, post- 
ers, banners, and similar printed 
material. Broderbund also recently 
announced a Commodore 64 ver- 
sion of the popular Where in the 
World Is Carmen Sandiego? that was 
first developed for the Apple com- 
puter. (Broderbund, 17 Paul Dr., 
San Rafael, CA 94903-2101) 

CBS Interactive Learning: 
Within the past year, CBS has 
changed its focus quite a bit, mov- 
ing more into the schools and less 
aggressively into the home market. 
Among the newest Commodore 
entries is a series of reading motiva- 
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tion programs based on famous 
books that are frequently taught in 
the schools. Called The Novel Ap- 
proach Series, these programs offer 
supplementary support before, dur- 
ing, and after reading the volumes, 
By this fall, CBS will have Commo- 
dore versions of Animal Farm, Lord 
of the Flies, A Tale of Two Cities, The 
Call of the Wild, and Romeo and Ju- 
liet, The CBS Success with Math 
and Success with Algebra series 
continue to be popular in both the 
home and the classroom, (CBS In- 
teractive Learning, CBS, 1 Fawcett 
Pl., Greenwich, CT 06836) 
Davidson & Associates: Best- 
sellers such as Math Blaster! and 
Word Attack!, first available on the 
Apple computers, have been re- 
leased in Commodore format by 
Davidson, which has a strong pres- 
ence in the Apple community. 
There are a variety of other Com- 
modore programs, as well. (David- 
son & Associates, 3135 Kashiwa St., 
Torrance, CA 90505) 
DesignWare and EduWare: 
Among the newest Commodore 
educational packages from Design- 
Ware are European Nations & Loca- 
tions, a European facts and 
geography program; The Grammar 
Examiner, covering basic grammar 
skills; Remember!, a memory learn- 
ing tool for high school students 
and adults; and The Notable Phan- 
tom, a music learning program for 


aod 
Mhitetisn 


pe 


f good choice 





You see plankton ahead. 
You attenpt to ignore then. 


Plankton are not in your diet. 
Press SPACE BAR to continue 


youngsters five to ten years old. 
EduWare also offers several Com- 
modore educational programs. (De- 
signWare and EduWare Services, 
185 Berry St., Bldg. 3, Suite 158, 
San Francisco, CA 94107) 

DLM Teaching Resources: 
Another well-known educational 
software company with a strong 
presence in the schools is DLM 
Teaching Resources. The compa- 
ny’s newest Commodore software 
includes the new Create with Gar- 
field, in which students create their 
own posters, labels, and cartoons as 
they practice writing, creative 
thinking, design, and organization 
skills. The company also sells ap- 
proximately two dozen other Com- 
modore educational programs in 
math, language arts, and early 
childhood learning. (DLM, One 
DLM Park, P.O. Box 4000, Allen, 
TX 75002) 

Gamco Industries: Gamco 
publishes educational software for 
Apple, Radio Shack, and Commo- 
dore computers. Its programs offer 
practice in learning many of the 
major subject areas taught in 
schools. Two of its latest Commo- 
dore products are Money Squares, a 
tic-tac-toe game that drills players 
in money skills; and Time Explorers, 
a two-player adventure game that 
teaches how to tell time. (Gamco 
Industries, P.O. Box 1911, Big 
Spring, TX 79720) 
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The Learning Company: The 
Learning Company built a reputa- 
tion in the educational market with 
its acclaimed Rocky's Boots. Titles 
that have more recently become 
available in Commodore versions 
include Reader Rabbit, Robot Odys- 
sey I, and Magic Spells, There are 
also a number of older titles in 
Commodore versions. (The Learn- 
ing Company, 545 Middlefield Rd., 
Suite 170, Menlo Park, CA 94025) 

Learning Technologies: Learn- 
ing Technologies’ educational strat- 
egy is to build what they call a 
Lifetime Learning Library. The 
company’s programs are presented 
in three series: Early Learning, 
Thinking Strategies, and Math 
Concepts. Among recent titles are 
Animal Hotel, Lion’s Workshop, 
Number Please, Gremlin Hunt, and 
Math in a Nutshell. Each package 
contains a Learning Kit, which in- 
cludes a full-color poster illustrat- 
ing the program's graphics, a 
custom lesson plan, three work- 
sheets, user management charts, 
and award certificates. (Learning 
Technologies, 4255 LBJ, Suite 265, 
Dallas, TX 75244) 

MECC: Odell Lake is a new en- 
vironmental simulation that teach- 
es children from five to eight years 
of age how a lake habitat functions. 
Other MECC titles, newly available 
from Commodore, include Adven- 
tures with Fractions; Expeditions 
(American history); The Friendly 
Computer (elementary introduction 
to the computer); The Glass Com- 
puter (how computers work inter- 
nally); The Market Place 
(elementary economics); Path Tac- 
tics (racing robots to learn math 
skills); Pre-Reading (reading readi- 
ness); and Spelling Bee (elementary 
spelling). These MECC titles are 
available directly from Commo- 
dore. (Commodore Business Ma- 
chines, 1200 Wilson Dr., West 
Chester, PA 19380) 

Numerous other Commodore 
titles are available directly from 
MECC, (MECC, 3490 Lexington 
Ave. North, St. Paul, MN 55126) 

Micro-Ed: Micro-Ed has been a 
major supporter of Commodore 
computers in educational settings 
for quite a while. Currently, about 
1000 Micro-Ed programs are avail- 
able for the Commodore 64, a line 
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The Commodore version of CBS's popu- 
lar Success With Math series has been 
recently revised. 


of curriculum-based software that 
is primarily sold into the schools, 
but is now also available to the re- 
tail market, Some of these titles in- 
clude Capitalization Series and Basic 
Grammar (language arts series); U.S. 
Time Zones, The Calendar, and The 
Clock (social studies series); Story 
Problems in Addition and Subtraction 
and Math Spin (math series); and 
The Atom and Save the Whales (sci- 
ence series), (Micro-Ed, P.O. Box 
444005, Eden Prairie, MN 55344) 

Mindscape: Some of Mind- 
scape’s earliest products were edu- 
cational programs, though the 
company has since branched out to 
offer entertainment packages as 
well. The most recent Commodore 
educational titles include The Hal- 
ley Project, Crossword Magic, The 
Perfect Score, Bank Street Music 
Writer, Bank Street Story Book, Tink’s 
Subtraction Fair, and Castle Clobber. 
(Mindscape, 3444 Dundee Rd., 
Northbrook, IL 60062) 

Simon & Schuster: Simon & 
Schuster’s newest Commodore 
educational title is Chem Lab, a 
software-based chemistry laborato- 
ry for children interested in science. 
The company also has Commodore 
versions of many other titles, in- 
cluding such recent programs as 
Kermit's Electronic Storymaker and 
The Great Gonzo in Wordrider. (Si- 
mon & Schuster Software, Gulf and 
Western Bldg., One Gulf and West- 
ern Plaza, New York, NY 10023) 

Spinnaker Software: Spinna- 
ker, which earlier this year ab- 
sorbed the product line of Hayden 
Software, recently released Com- 
modore versions of two Homework 
Helpers Series programs, Writing 





and Word Problems, both for stu- 
dents in grades 7-12. The company 
also offers its Early Learning Series, 
Learning Discovery Series, Learn- 
ing Adventure Series, and Fisher- 
Price Series, (Spinnaker Software, 
One Kendall Square, Cambridge, 
MA 02139) 

Springboard Software: On the 
heels of Springboard’s popular The 
Newsroom newspaper/newsletter 
printing program, the company has 
recently released Commodore ver- 
sions of Clip Art Collection 1 and 2 
for use with The Newsroom. The 
program is used in both schools and 
homes, and is being further en- 
hanced with Springboard’s Com- 
modore version of the Graphics 
Expander, 1, which adds more tools 
to The Newsroom. Two of the com- 
pany’s most popular products have 
been Early Games for Young Chil- 
dren and Easy As ABC, (Springboard 
Software, 7808 Creekridge Circle, 
Minneapolis, MN 55435) 

Sunburst: Sunburst has more 
than 30 Commodore educational 
programs, ranging from preschool 
to adult-level packages. Most re- 
cently, the popular Muppet Learn- 
ing Keys tablet, first available on 
Apple computers, has become avail- 
able in a Commodore version with 
supporting software, Two of the 
new Learning Keys programs are 
Getting Ready to Read and Add and 
Tiger's Tales, both young-learning 
packages. There are many other 
Commodore products, and the 
company publishes six catalogs a 
year featuring products for both the 
school and home markets, (Micro- 
computer Courseware Division, 
Sunburst Communications, Inc., 39 
Washington Ave., Pleasantville, 
NY 10570) 

Weekly Reader Family Soft- 
ware: Weekly Reader continues to 
introduce new titles in its successful 
Stickybear series of software prod- 
ucts for younger children. Already 
available for Commodore are Sticky- 
bear Town Builder, Stickybear Spell- 
grabber, Stickybear Typing, Sticky- 
bear Opposites, Stickybear ABC, 
Stickybear Shapes, Stickybear Read- 
ing, Stickybear Math I, and Sticky- 
bear Numbers. (Weekly Reader 
Family Software, 4343 Equity Dr., 
P.O, Box 16754, Columbus, OH 
43216) @ 






# COMPLETE 
DESKTOP 





The Complete Desktop Publisher 

Daniel J. Makuta and William F. Lawrence 

A comprehensive reference and guide to what is fast 
becoming one of the most popular uses of comput- 
ers, this book guides the novice through the in- 
tricacies of desktop publishing. Clearly written and 
understandable, this guide covers all the basics of 
typography, layout, and design. Sample formats and 
layout grids make it easy to get started. Details on 
using graphics to enhance publications, discussions of 
the desktop publishing software currently available, 
and comparisons of laser printers, typesetters, and 
other printing devices give you everything you need 
to make intelligent decisions. Chapters outline the 
elements of fitting copy, proofreading, binding and 
folding, and media conversion. You'll also find a 
wealth of information on telecommunications—how 
to transmit your publication for typesetting or print- 
ing—as well as tips on dealing with outside design 
agencies, typographers, and printers, The definitive 
guide. 


$19.95 ISBN 0-87455-065-3 


GET THE MOST 


From Your Computer! 





7] Two new books from COMPUTE! 
bring you innovative ideas to exploit 
the capabilities of your computer to 
the fullest and to make use of it in 
ways you didn’t know were possible. 
There’s an in-depth look at desktop 
publishing—how to get started and 
how to set up your publication. A 
compendium of special software 
tells you where to purchase in- 
expensive software that will open up 
a new world of applications. The 
information is non—machine-specific 
and is designed for beginning to ad- 
—] vanced computer users. 


1 Didn’t Know You Could Do That 

with a Computer! 

Dan Gutman 

There's more to computers than processing words, 
juggling numbers in a spreadsheet, or filing records in 
a database. A world of unusual, practical, and amaz- 
ing computer programs is available which can help 
you do anything from planting a garden to writing a 
will. These programs range from the simply fascinating 
to the outright esoteric. More than 100 little-known, 
yet intriguing commercial software packages are eval- 
uated and reviewed: programs which can plot your 
astrological future, show you the night skies, plan 
your next road trip, help you raise your child, and 
give you the edge at the racetrack. Entertaining—cer- 
tainly unique—this book puts an end once and for all 
to the question “Now that | have a computer, what 
do | do with it?” 

$14.95 ISBN 0-87455-066-1 


Look for these books at your local computer or book store. 

Or, to order directly from COMPUTE!, call toll-free 800-346-6767 (in NY 212-887-8525), or write COMPUTE! 
Books, P.O. Box 5038, F.D.R. Station, New York, NY 10150. Please include $2.00 shipping per book for U.S. 
and surface mail; $5.00 airmail. North Carolina residents add 4.5 percent sales tax. New York residents add 
8.25 percent sales tax. Please allow 4-6 weeks for delivery. 


COMPUTE! Publications,inc.@ 


‘One of the ABC Publishing Companies 

825 7th Avenue, 6in Floor, New York, Ny 10019. 

‘uzsahers of COMPUTE! COMPUTE Gazette, COMPUTE!’ Garett Dak. COMPUTE Books, COMPUTES Anca 
Appications, nd COMPUTE Alot ST Ok ond Mogamne 








COMPUTE! books are available in the U.K., Europe, the 
Middle East, and Africa from Holt Saunders, Ltd., 1 St. 
Anne's Road, Eastbourne, East Sussex BN21 3UN, England, 
and in Canada from McGraw-Hill, Ryerson Ltd., 330 
Progress Ave., Scarborough, Ontario, Canada M1P 2Z5. 


Update On The. 
Electronic University 


Kathy Yakal, Assistant Features Editor 


The process of completing a college 
education can be complicated by 
many factors, First, finances. Tu- 
ition costs have skyrocketed over 
the last few years. Add to that basic 
cost the price of books and housing 
and all of the other necessities that 
seem to crop up in the course of 
four years, and you're talking about 
a fairly expensive proposition. Sec- 
ond, location, If you don’t happen 
to live near a college or university, 
and are unwilling or unable to relo- 
cate, your options are limited. And 
third, timing, Some people simply 
cannot fit a college education into 
their schedules. They start families 
or take jobs after high school, and 
can never fit in a college education 
at the right time. 

Correspondence courses are 
one solution, as are night classes at 
community colleges. Another op- 
tion, made possible by the relative- 
ly simple, inexpensive process of 
telecommunications, is TeleLearn- 
ing System’s Electronic University, 
a unique personal computer deliv- 
ery system for education. Since its 
inception in 1983, people of all ages 
and backgrounds who would oth- 
erwise have been unable to attend 
traditional classes have successfully 
completed courses—even earned 
degrees—using their computers to 
communicate with instructors 
across the country. The program 
has received acclaim from business, 
education, and government lead- 
ers, all the way up to the Vice Presi- 
dent of the United States. 

The Electronic University does 
not grant degrees. It serves as a de- 
livery system, a liaison between 
students wanting to take classes 
and the institutions willing to ad- 
minister them, 

Software is available for Com- 
modore 64, Apple, and IBM com- 
puters (Telelearning Systems sells 
these computers and modems at a 
discount, if you don’t already own 
one). The registration fee for the 
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network itself is $195, This, though, 
is just a starter kit, and does not in- 
clude the cost of course registration 
or additional fees. 


Several Alternatives 

You may choose from three differ- 
ent paths in the Electronic Universi- 
ty, according to your individual 
educational goals, First, you can 
take individual courses without 
pursuing a degree or certificate. 
Should you decide in the future to 
work toward a degree, these earned 
credits can be applied. Second, you 
can earn a degree or certificate. A 
variety of full degrees and special- 
ized certificate programs is avail- 
able through the Electronic 
University Network, including an 
Associate of Arts, Associate of Sci- 
ence in Management, Bachelor of 
Arts, Bachelor of Science in Busi- 
ness Administration, and Master of 
Business Administration (MBA). 
Six specialized certificates in busi- 
ness and computer-related fields 
are also available. Third, you can 
accumulate transferable credit. 
Many students already working to- 
ward a degree at a college in their 
local area take supplementary 
courses on the network. These 
course credits are then transferred 
to the local degree program. 

Once you've registered for a 
course and received the class mate- 
rials in the mail, you and your in- 
structor communicate via electronic 
mail on the network, You send 
completed assignments and ques- 
tions to your instructor, and receive 
support and feedback. In addition, 
there are online forums—class- 
room situations where you simulta- 
neously discuss topics with other 
students online. 

An Electronic University Net- 
work membership gives you access 
to more than 60 databases and oth- 
er services through the Electronic 
Library. Individualized counseling 





is also available at no charge, 

Though this Telelearning Sys- 
tems project has already offered 
educational opportunities to people 
who would otherwise not be able to 
attend school, its founders think 
even more can be done. Beginning 
this fall, a new generation of soft- 
ware, Computer Telecommunicated 
Instruction, will be available, Ac- 
cording to Telelearning Systems 
president Tim Leister, it’s state-of- 
the-art, user-friendly software that 
allows more open-ended communi- 
cation between student and instruc- 
tor, It’s a separate set of courses 
with a separate cost structure (un- 
determined at this writing). “We 
ourselves have come up over the 
learning curve over the last three 
years,” says Leister. “It’s been a 
three-year process of really under- 
standing what the customer base 
needed and wanted. Now we feel 
we know, and that will be reflected 
in this new generation of software.” 

To help motivate students, the 
new course structure calls for more 
negotiation between student and 
instructor to determine the struc- 
ture and time frame of the course. 
Students can also continue to com- 
municate with an instructor after a 
course is completed. Other im- 
provements to the software include 
word processing capabilities, im- 
proved user documentation, and 
the transmission of all lesson parts 
to the instructor (in the past, every 
third lesson was not required to be 
sent in via modem). Though only a 
limited number of courses will be 
available initially with the new 
software, eventually all courses 
offered will be included. 


For more information on the Electron- 
ic University Network, write to: 
Office of Admissions, Electronic Uni- 
versity Network, 505 Beach St., San 
Francisco, CA 94133; or call 
800-22LEARN (California residents 
call 800-44LEARN). @ 








Pig$ For Buck$ 





Bruce Willis and Dave Zeigler 








required. 


As soon as we set eyes on the sprite 
and sound commands of Commo- 
dore’s BASIC 7.0, we wanted to see 
if it was possible to write an arcade- 
style game almost entirely in 
BASIC. The result was “Pig$ For 
Buck$,” a nonviolent game that’s 
fun for children and adults. Just one 
word of warning: The game is ex- 
tremely habit forming. And it’s 
somewhat difficult: No one has yet 
made it past level 11. 

Farmer Brown raises pigs, and 
now he must catch them to take 
them to market. But the price of 
pigs is dropping, so it must be done 
quickly to insure a profit. 

Farmer Brown is somewhat 
vain—he must have clean overalls 
to wear to the market. The pigsty, 
however, is naturally slippery and 
full of mud puddles. Stepping in 
the mud or touching the electric 
fence will certainly cause him to 
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Both children and adults will have hours of fun 
with this innovative and amusing game. The ob- 
ject is to catch each of your squealing and elusive 
pigs so you can take them all to market. And, as 
you'll see, keeping your overalls clean—a must as 
far as meticulous Farmer Brown is concerned— 
means you'll have to stay clear of the many mud 
puddles. For the Commodore 128. A joystick is 


slip and fall. His clean overalls will 
get muddy. But if he does fall, all is 
not lost. His clothesline contains 
four clean pairs of overalls, and 
he'll be able to buy up to four more 
pairs at the market. 

Occasionally a pig will manage 
to squeeze out of a hole in the 
fence. Farmer Brown’s assistant, 
positioned outside the fence, will 
eventually catch the loose pig and 
return it to the sty. Farmer Brown 
must be very cautious while leading 
a pig near the fence because the 
helpful but mischievous farmhand 
loves to see his employer fall in the 
mud, He just might push a pig back 
through the fence right into Farmer 
Brown’s path. 

The object of the game is to 
catch all the pigs in the pen as 
quickly as possible. The bank ac- 
count total is added to your score, 
and the sooner you sell your pigs, 








Farmer Brown (left side of the screen) 
has just landed in a mud puddle, soiling 
his last clean pair of overalls—and end- 
ing the game. 


the more profit you make. When all 
of your overalls have become mud- 
dy, the game ends. 


Typing It In 

The main part of the game is writ- 
ten in BASIC, but also included are 
one short machine language rou- 
tine and three sprite definition files. 
(There are 24 sprites used in the 
game.) 

First type in Program 1, which 
is written entirely in BASIC. Be sure 
to save a copy when you're through 
typing. ‘“MLX,”’ a machine lan- 
guage entry program found else- 
where in this issue, is required to 
type in the four remaining files. 
After loading and running MLX, 
you'll be asked for a starting and 
ending address. Here are the correct 
values: 
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Melodian will teach you to play, compose, 
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A True BreeRTRTSSaR In Music Education 
At last, a program that makes it not only easy but fun to learn music. 
The Melodian keyboard and software were designed by Harry Mendell 
who designs custom synthesizer electronics and software for professional 
musicians such as Stevie Wonder and Eric Himy, an award winning 
concert pianist. The Melodian boasts many of the professional features 
found only on more expensive equipment, These features include 
multitrack recording, the ability to create custom instrument sounds and 
most importantly. ease of use 





Start your lesson with RhythmMaster Software. With its builtin 
metronome, RhythmMaster will display the treble and bass musical staffs 
and a picture of a piano keyboard. RhythmMaster will then play a measure 
of music and you must try to play the same measure back on the Melo: 
dian keyboard, You're not familiar with the keyboard or can't read music? 
No problem. RhythmMaster displays the notes you are to play on the 
musical staff and on the keyboard pictured on the monitor. If you strike 
the wrong key the note on the musical staff tums red and shows you 
which key you played wrong, making it ever so easy to correct what 
you played 

if you should hold a key too long a turtle runs across the screen. Inverse: 
ly if you should release a key too quickly a rabbit scurries by. If you don't 
play it correctly RhythmMaster knows it and repeats the measure for you 
to play 

ConcertMaster teaches you how to play 35 pre-recorded songs from 
Bach to Rock. With ConcertMaster you can analyze music note by note, 
instrument by instrument and learn how a music composition is put 
together. Then you can compose your own music and record it right on- 
to your floppy disks 

There are nineteen different instrument sounds to choose from in over 
a seven octave range giving you a wide choice of instruments to suit 
your musical taste and expression, You can also create your own instru- 
ment sounds. 
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ScoreMaster enables you to print out your music in standard music 
nolation for other musicians to play, or for yourself. 


New York Times Says... 


Erik Sandberg-Diment of the New York Times states “really useful and 
instructive item ... Tanya, our 10 year old beginner quickly caught the 
spirit of matching the dance of her fingers to the measured metronome,” 
“One piece of educational software that, unlike most of its kinfolk, ac- 
tually delivers, These software-hardware combinations offer a lot of enter- 
tainment to the Commodore owner.’ 








RUN Magazine Says... 


Tom Benford of RUN notes "Whenever a selection of products of the 
same genre is available, one among the bunch rises head and shoulders 
above the rest. Such is the case with Melodian ConcertMaster keyboard 
and software. The combined features of RhythmMaster and ConcertMaster 
give you a complete music tutorial.” 


AHOY! Magazine Says... 

Pegey Herrington of AHOY! said “The system is so easy to use that | 
didn't need the documentation”. "It’s fun, challenging, and educational, 
and for playability and ease of use it is nothing short of spectacular.” 





Satisfaction Guaranteed When You Buy Direct 


By selling directly to you, we are able to give you the Melodian Keyboard 
and Software at far lower prices than ever offered before. You take no 
risk. If the Melodian keyboard or any of the programs 
don’t please you, for any reason whatsoever, send it 
back within 6o days for a full refund! 


and record music in just one evening!! 


RHYTHMMASTER 





Rhythm Master 
Software rm-o: 


$§9-95 


thythmMaster teaches a beginner how to read music and play it cor- 
ectly and in rhythm on the musical keyboard 


thythmMaster will have you reading and playing musical notes in 
ninutes with fun and excitement. 

RhythmMaster Features: 

Trumpet, organ, violin, and synthesizer instrument sounds. Built in 
netronome. Pause/Play control. Set-up menu for customizing 
thythmMaster, 

RhythmMaster Teaches: 

{ow to read notes on the treble and bass musical staffs,the names of 
he notes, where the notes are on the keyboard how to play whole 
rotes, half notes, quarter notes, eighth notes and sixteenth notes in 
-ombinations, in both 3/4 and 4/4 time. How to play in different 
empos. 

RhythmMaster Requires: 

\ Commodore 64 or Commodore 128 with disk drive. Melodian 
Musical Keyboard kb-o1 is required to study the reading and playing 
of musical notes. 





Melodian Musical 


Keyboard kb-o: $99.95 


10 Keys (A-C) in professional gauge spring loaded to give the feel and 
esponse of a real keyboard instrument, Polyphonic. 

Registers (with ConcerMaster) ; 

Drgan, Trumpet, Flute, Clarinet, Piano, Harpsicord, Violin, Cello, 
Sass, Banjo, Mandolin, Calliope, Concertino, Bagpipe, Synthesizer 1, 
synthesizer 2, Clavier 1, Clavier 2, which can be played over a 7 
clave range. Programmable sounds as well. 

Recording (with ConcerMaster) 

Three track sequencer (recorder) with overdubbing and multitimbral 
different instrument sounds at the same time) effects. 

interface } 
3uill in interface for Commodore 64, Commodore 128, plugs right in 
0 joystick port no. 2 and user port. 

Power Supply 

owered direct by the computer, no batteries and cords required 
Finish 

Table Model in white high-impact material, with carrying handle, pro- 
ective key cover, and buill in music stand, Size 29 -1/8 X 9-9/6 X 
s-11/16, weighs 9 pounds. 





ConcertMaster 
Software cm-o1 $59-95 


ConcertMaster teaches how a composition is put together, note by 
note, instrument by instrument, You learn to play 35 pre-recorded 
songs from Bach to Rock. Then you can compose your own songs 
and record them right onto your floppy disk. 
ConcertMaster Teaches: 

Scales, Bass lines, Familiar Beginner Songs such as “‘Jingle Bells’, 
Easy classical songs such as "Bach Minuet" and Ravel's “Bolero”, 
Advanced classics like "A Midsummer's Night Dream" by 
Mendelssohn, Popular hits such as “Thriller” 

Instruments Sounds 

Organ, Trumpet, Flute, Clarinet, Piano, Harpsicord, Violin, Cella, 
Bass, Banjo, Mandolin, Calliope, Concertina, Bagpipe, Synthesizer 1, 
Synthesizer 2, Clavier 1, Clavier 22, which can be played over a 
Toctave range. Programmable sounds as well 

Recording Functions: 

Three track sequencer (recorder) with overdubbing and multitimbral 
(different instrument sounds at the same time) effects, 

Each track can be set to one of seven different functions: 

* Monitor: Lels you use a track to play music live, without recor- 
ding it 

* Record: Records a track as you play 

¢ Playback: Lets you hear whatever has been recorded or load- 
ed into the track. You may playback one track while recording 
another to build layers of instruments. 

¢ Mute: Turns a track off. This is useful when you want to listen 
to or record one or two tracks at a time, 

© Save: Stores a track to the disk. 

© Load: Loads a track from the disk. 

© Protect: Write protects a track 

Create New Instrument 

Sounds 

Choose from pulse, sawtooth, triangle and noise sound sources. Con- 
trol the sound envelope with allack, decay, sustain, and release 
times. Ring Modulation and Syncronization effects. Set Low pass, 
band pass, and high pass filler frequencies. 

ConcertMaster Requires: 

A Commodore 64 or Commodore 128 with disk drive. Melodian 
Musical Keyboard kb-o1 is required to study the reading and playing 
of musical notes. 








Melodian ScoreMaster 
sm-o1 $5 9 Q 95 
With the ScoreMaster program your music can be printed out in 
music notation, which other musicians can read and play. Any music 
recorded with te ConcerlMaster program can be printed by 
ScoreMaster. 

ScoreMaster Requires: 

A Commodore 64 or Commodore 128 with disk drive and printer 
compatible with the Commodore graphics mode such as the Com- 
modore MPS 803, 1515, and 1§25. 

Melodian ConcertMaster program, 


ACCESSORIES 
Demonstration Disk asteginrtin  $ 9095 
RECORDINGS 
Christmas Carols. i $12.95 
Tchaikowsky Nutcracker. $12.95 
Bach's Hits, $12.95 
Classical Favorites.,.....-..00» $12.95 








FOR CREDIT CARD ORDERS, CALL TOLL-FREE 


1-800-327-4566 


IN FLORIDA, CALL 1-800-351-8777 


For our International customers: Ploase send credit card number of international money order 
NUS. dollars, or call 308-979-3777. For Canada and Mexico, add $15.00 for air mail. Overseas 


add $16.00 for surface mail, and $70.00 for air mail 





The new, fast way to learn, play and compose music. 
1985, Melodian, Inc., 970 W. McNab Rd. Fort Lauderdale, FL 33309. All rights reserved. 
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C. Itoh’s Riteman C + 
is Commodore’s First Mate. 


If you've been looking for a quality printer for 
your Commodore® one that's small enough to 
fit in a briefcase or on the corner of your desk, 
sturdy enough to take day-in, day-out printing 
without a whimper, and inexpensive enough to 
save your wallet from that empty feeling, look 
no further. 

C. Itoh's Riteman C + gives you more printer 
for the money. 

For starters, the C+ gives you easy-to-read 
print with full descenders. In bold, italic, under- 
line, subscript, superscript and more. At up to 
44 lines per minute, And one button shifts you 
from draft to crisp, readable Near Letter 
Quality. 

What's more, the Riteman C + features an 
exclusive front paper feed design that makes 
loading paper really easy for the first time. 
According to PC Magazine, which awarded the 
printer its coveted Editor's Choice, “The most 
unique aspect of the [Riteman C + ]is its paper 
feed and platen system. The paper never jams, 
alignment is easy and the impression is good. 
In addition [it] supports a high-resolution 
graphics mode like that of the IBM® and Epson 
FX® series printers” 

Like all printers in the C, Itoh Riteman line-up, 
the C+ is quality built and backed by a full 
one-year warranty. 

Want a great little First Mate for your Com- 
modore? Get yourself a Riteman by C. Itoh. For 
the name of the dealer nearest you, call C. Itoh 
today at (800) 423-0300. 


CITOH 


C. Itoh Digital Products, Inc. 


19750 S. Vermont Avenue + Suite 220 « Torrance, CA 90502 
Telephone: (213) 327-2110 or (800) 423-0300 

















Program 2 
Starting Address: 1£06 
Ending Address: 1F05 


Programs 3, 4, and 5 
Starting Address: 0E00 
Ending Address: OFFF 
Be sure to save each of these programs with its re- 
spective filename: 


Program 2: PIG.ML 





Also, be sure to save each of the five programs to 
the same disk. 

Note that several lines in Program 1 are packed 
with commands. This was done to maintain speed dur- 
ing the main program loop. The decimal points used in 
many commands are not errors. They can be used in 
place of a zero and are slightly faster than variables or 
constants. Programs 1 and 2 make use of the FAST 
command, which blanks the screen during DATA POKE- 
ing and screen setup. 

To start play, load Program 1 and type RUN, (The 
machine language program and sprite files will be 
loaded automatically.) Most of the screen is taken up 
by the pigsty. At the bottom of the screen is a clothes- 
line, bank account balance, your present score, and the 
high score. The current level is displayed at the top of 
the screen, The selling price of a pig appears at the top 
right when one is sold. 


The Pork Business Isn’t Easy 

With a joystick—plugged into port 2—chase the pigs 
arid catch them by pressing the fire button when con- 
tact is made. But beware: If you collide with a pig while 
leading another pig out of the pen, you'll trip and fall in 
the mud. If you see that a collision is unavoidable, 
press the fire button to release the pig you are leading. 

Lead each pig out of the gate in the upper-left cor- 
ner and go catch the next one. The selling price of a pig 
is set as soon as you lead it out of the gate. The price 
starts at $100 at the beginning of a round and drops $6 
every 10 seconds to a low of $60. The selling price is 
added to your present score, along with bonus points if 
the pig was caught before the selling price hit $60. 

When all the pigs have been captured, you'll auto- 
matically purchase as many piglets as you can afford. 
Piglets—including the food needed to raise them— 
cost $60 dollars each. You can buy a maximum of sev- 
en per round. You'll then be given the option to pur- 
chase overalls to replace the ones taken from the 
clothesline during play. The store has four pairs in 
stock at the beginning of a game, and sells them for $25 
a pair. When the last pair of pants from the clothesline 
gets muddy, the game ends, even if there are more 
pants in stock at the store. 

After all pigs have been caught and sold, you ad- 
vance to the next level. As the levels increase, so do the 
size and number of mud puddles on the screen. At 
higher levels, the speed of the farmer will vary. 

At the end of a game, you have the option to play 
again. The high score for the current session of play is 
displayed at the bottom right. 

See program listings on page 121. @ 





- (Fily Faster and Farther 


with COMPUTE!’s 
40 More Great Flight Simulator Adventures 


mill 


Tl Ta This follow-up to the popular 40 Great Flight Simulator 
Mill 


Adventures brings you 40 more exciting, suspenseful 
flight simulator scenarios to help you get the most 
enjoyment from your Flight Simulator or Flight Simu- 
Iator II software. 


40 More Great Flight Simulator Adventures 

Charles Gulick 

Microsoft's Flight Simulator (IBM PC) and Sublogic's Flight Simulator II (Ap- 
ple II, Commodore 64, Atari) are two of the most popular software pack- 
ages today, They put you in the pilot's seat, letting you experience the 
thrill of flight. Now, 40 More Great Flight Simulator Adventures, the sec- 
end such guide, brings you more dazzling flights drawn from both fact and 
fancy. 

Now you can fly where no one has flown before, with the author as 
your flight instructor, He helps you explore the unknown regions of flight 
simulation—taking you through cities, over mountains, under bridges—as 

A you explore America from the air. Complete parameters and instructions 
ny frat Wheat Y ue at each step make flight easier and more exciting than ever before. 
iy spe Wt Mo $9.95 ISBN 0-87455-043-2 


Note: The Flight Simulator program itself is not included and must be pur- 
chased separately, 





To order any COMPUTE! book, call toll free 800-346-6767 (in NY 212-887-8525). 
Or mail in the attached coupon with your payment. Include $2.00 shipping and 
handling per book. 


Please send me —_______ coples of 40 More Great Flight Simulator Adventures at $9.95 each, 
(ISBN 0-87455-043-2) 
All orders must be prepaid in U.S, funds, 

Subtotal ———— 

NC residents add 4.5% sales tax ——_______ 

cere eepriere COMPUTE! Books 


$2.00 shipping and handling 
per book SE F.D.R. Station 


| 

| 

| 

| 

| 

| 

($5.00 per book airmail) New York, NY 10150 | 
Total amount enclosed coe SBN y | 
| 

| 

| 

| 

| 

| 


( Payment enclosed (check or money order) 
Charge Visa OMasterCard O American Express 


Name 





Address 


City State Zip 
Please allow 4-6 weeks for delivery. 


1 H 1 COMPUTE! books are available in the U.K., Europe, the 
COMPUTE! cee Middle East, and Africa from Holt Saunders, Ltd., | St. 
no of tno ABC Publuhng Companes Anne's Road, Eastbourne, East Sussex BN21 3UN, Eng- 

a CINE eal ‘ land and in Canada from McGraw-Hill, Ryerson Ltd., 330 


age Progress Ave., Scarborough, Ontario, Canada MIP 2Z5. 
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Persuasion 


Kevin Mykytyn and Mark Tuttle 


Match wits with a friend in this unique strategy 
game. There are no random game elements, so the 
best player always wins. For the Commodore 64. 


A joystick is required. 


“Persuasion” is a different kind of 
strategy game. Players take turns 
“persuading” neutral zones to join 
their domain. There are a few obvi- 
ous thematic similarities to the 
American Civil War—North vs. 
South, blue vs. gray—but the com- 
parison ends there. Persuasion is a 
nonviolent game with no random 
factors. Like checkers or chess, the 
outcome is decided entirely by 
player movements. 


Blue Vs. Gray 
After typing in the program, save a 
copy to tape or disk. To play, type 
RUN. Be sure to plug a joystick into 
port 2 (both players share the same 
joystick in this game). Player 1, 
who starts at the top of the playing 
field, is the North player. Player 2, 
the South player, begins at the bot- 
tom. Player 1 always moves first. 
As you can see in the game 
photo, the playing field consists of 
30 locales, each colored red, laid 
out in a hex pattern. The field is po- 
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sitioned on top of a screen divided 
by the players’ colors, blue and 
gray. The number of locales owned 
is shown in each player's color area 
on the left. On the right is the game 
title—Persuasion—which is alter- 
nately displayed in the blue or gray 
area to indicate whose turn it is. To 
win, you must capture 16 locales. 
However, a tie is possible if each 
player captures 15 locales. 
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The North player has landed on a neu- 
tral locale and changed it from red to 
green. The South player has just claimed 
a locale and tied the score. 





To begin the game, move your 
piece (a yellow border around the 
active player's piece always indi- 
cates whose turn it is) to an adjacent 
locale by moving the joystick diag- 
onally to the desired destination. 
For example, to move southeast, 
move the joystick in that direction. 
As you move to the locales, they 
change color. At the beginning, all 
are red, The first time a locale is en- 
tered by either player, it turns 
green. If either player enters a green 
locale, it turns two colors—light 
blue and dark blue for the North 
player, or light gray and dark gray 
for the South player. With one 
more reentry by the same player, 
the locale turns a solid color (blue 
or gray), and that locale is in the 
player’s domain. The score is then 
updated, 

If the opposing player enters a 
two-color locale, one that’s about to 
fall to his or her rival, it’s turned 
back to green. Once a locale has 
been won over, a movement into 
that area by the owning player will 
turn it back to red, the neutral color. 
This is an important feature because 
it may determine your strategy. As 
you'll see, it’s not difficult to box 
yourself in where your only move is 
to reenter a controlled locale, thus 
undoing all your hard work. Once a 
locale is totally owned (solid gray 
or solid blue), the opposing player 
cannot change it. 

Persuasion might appear a bit 
complicated at first, but after a few 
minutes with your first game, you'll 
see that it’s easy to play. A good 
strategy is the key to winning. 

See program listing on page 107. @ 








From Writing Your Own Programs to 
Modifying Existing Software, Here's the New, 
Easy, and Low Cost Way to Unlock the Secrets 
of Your Computer 

Whether you use computers for business, for personal 
applications, or for fun, off-the-shelf programs will never do 
everything you want them to do for you. That's because they 
were written by programmers to satisfy what they perceived 
as the needs of the greatest number of potential 
users—often missing some or many of your 
specific needs, 

That's why McGraw-Hill’s new Contemporary 
Programming and Software Design Series teaches 
you how to create your own software. . .either 
from scratch or by making key modifications to 
existing programs. 

There is nothing magical about it. You learn the 
process of building a computer program step-by- 
step with McGraw-Hill Concept Modules sent to you one ata 
time, once a month, Each of the ten modules in the Series takes 
you through an important step in the development of the 
structure and detailed logic of a program, including testing, 
debugging, and documentation. 

Unique Interactive Hands-On Instruction 

Each module includes an easy-to-understand guide PLUS a 
514" floppy disk containing typical programs and interactive 
instruction that you can run on Commodore 64 and 128 computers, IBM 
PCs and PC compatibles for hands-on experience. 

In the first Module, for example, when your sample program (Declining 
Interest Loans) appears on your screen, you'll find errors on certain pro- 
gram lines, You'll also see that the program is only three-quarters completed. 

Now comes the fun part. You'll discover 
how this program is built, and in the process 
you'll learn how to identify and correct 
errors. And by the end of Module 1, 
you'll actually have completed this 
program yourself. 
But there's more. Special graphics 

on your screen work in conjunc- 

tion with the accompanying guide 

to amplify, illustrate, and deepen 

your understanding of software 

design principles. 


Hovse ald 
Twentory 











Budget Plan 
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Declining Interest 


Loon 


Make no mistake, Almost all books and courses on “programming” 
teach you only the final 5% of the total programming process— 
hamely, how to code in a specific language. . . information of little 
value if you don't know how to reach the point in the programming 
process When you are ready to code, 

With the Series, however, you'll learn to create your own programs 
from scratch, even modify off-the-shelf programs. You'll learn enough 
BASIC and machine language to get you started on the remaining 
59% of the programming process, 


Build Your Own Personal Software Library 
‘The sample programs you work with throughout the 
Series are excellent learning tools. But they're more than 
that, By combining the sample programs onto one master 
disk, you'll have the start of your own personal software 
library. In addition to the programs you've written and 
modified throughout the Series, you'll also receive dozens 
‘of the most popular public domain and user-supported pro- 
grams, such as data base manager, word processor, calen- 
dar generator, appointments reminder and much, 
much more, 


15-Day No-Risk Trial 


To order your first module without risk, send the 
postage-paid card today. 
Examine the first module 

for 15 days and see how 
the Series will help you 
make your computer do 
exactly what you want 
it to do! 


















If someone has beaten you to the card, write to us for order- 
ing information about the Contemporary Programming and 
Software Design Series. 


The Crucial 95%—Learn the Foundation of Computer Programming 
While the Series includes interactive disks that run on specific computers, everything 
you learn you can apply to any language or machine, Why is this possible? Becatise 
McGraw-Hill knows programming is far more than coding a program into the computer 
using a specific language. In the real world of computers, 95% of the programming pro- 
cessis carried out using design techniques that are independent of specific language or 
machine. Itis this crucial 95% that you thoroughly understand and master in the Series. 


McGraw-Hill 
Continuing Education Center 


3939 Wisconsin Avenue 
Washington, DC 20016 
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Ringside Karate 


As in real karate, skill, speed, and 
timing are the necessary ingredi- 
ents to play ‘Ringside Karate.’’ 
Each player controls one fighter 
with a joystick. Moving the stick 
right and left moves the fighter for- 
ward and back. To punch, move the 
joystick toward your opponent and 
press the fire button. To kick, push 
the joystick away from you (diago- 
nally, northeast for the left player 
and northwest for the right player) 
and press the fire button. To foot- 
sweep, move it southeast (left play- 
er) or southwest (right player) and 
press the fire button. Pressing the 
fire button in any other position 
causes a defensive block. To win, 
you must score ten knockdowns, 
each worth 100 points. 

Timing is crucial because the 
fire button must be released for a 
moment before another attack can 
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Anthony Bertram 


In this outstanding commercial-quality, arcade- 
style game, you go head-to-head with another 
player to see who deserves a black belt. For the 
Commodore 64. Two joysticks are required. 


be made. If the button is pressed 
rapidly, the fighter won’t move and 
will likely be knocked down. Block- 
ing provides a limited defense and 
is best used just before a counterat- 
tack or when backing up. Those 
who have played an arcade karate 
game will find the controls easy. 


Typing It In 

Ringside Karate is written entirely 
in machine language. “MLX,” the 
machine language entry program 
found elsewhere in this issue, is re- 
quired to type it in. After loading 
and running MLX, enter the follow- 
ing addresses at the prompts: 


Starting Address: 3000 
Ending Address: 45BE 


The game is fairly long, but 
much of the sprite and screen 
DATA are repeated numbers, 








The white player needs one more knock- 
down to win this match. 


which makes the typing a little 
easier. 

To load the game, disk users 
should type LOAD “filename’,8,1 
(where filename is the name you 
used to save the program). Tape us- 
ers should type LOAD “‘file- 
name"’,1,1. To start the game, type 
SYS 15490. The joystick plugged 
into port 1 controls the fighter 
dressed in white, and the joystick in 
port 2 controls the fighter in black. 
When the game is over, a winner is 
declared, and another game may be 
started by pressing any key. 

See program listing on page 109. @ 





imlirefelCiolniewentanaeulalcn 
thats based on an old favorite. 


The new Star Gemini II. 
The printer that was made for 
your Commodore PC. 
We took all the best features from 
‘our best-selling printer for Commodore” users. 
Then we'added enhanced Near Letter Quality printing... lt-inr 
Commodore interface (with cable included)...a rear tractor feed...and an 

ont panel controls that makes printing easier than ever. 

The r ? The new Star Gemini II, A printer designed to help your Commodore’ 
performance. Without hurting your budget. 

Now at Toys ‘R’ Us and other major chain stores. IL 


In front with quality up front. S (@) 


The new Star Gemini I]. mucrontes 


® Commodore is a registered trademark of Commodore Business Machines, Inc 





AM-6PM 


PRINCETON 
GRAPHICS 


MAX-12 Amber 175 
HX-12 AGB. 458 
SR+12 RGB 875 


COMMODORE 
1871 CALL 
1841 eCANL 


INDUS 


GT Commodore. 179 


COMTEL 


Enhancer2000(C-64)... 149 





COMMODORE 
128 CALL 
1902-4... CALL 
C1350 Mouse “39 
©1700 128 K RAM... 145 
C1780 512 K RAM... 269 


Sane 35 
Perfect Writer 45 
Perfect Cale 45 
Portect Filer 45 
EPYX-64 
Movie Monster.......24.75 
Vorpol Kits ......1....22.75 
Fast Load 24.75 
Summer Game Il..... 24.75 
Super Cycle 2475 
World Games 24.75 
Football 24.75 


54” 
DISKETTES 
MAXELL 


9.99 
12.99 


VERBATIM 
SSDD.. 9.50 
DSDD. 12.99 








BONUS 
SspD 
DSDD.. 





SKC 


SSDD 
DspD 





3.5” 
DISKETTES 
3M 


SSDD............16.99 
OSDD....,.......23.99 


MAXELL 
16,99 
23.99 
VERBATIM 
SSDD......, 


16,99 
OspD. 24.99 











SKC 


SSDD,. 
OSDD. 


14.99 
19.99 








XETEC 


Font Master 11 64, ,, 32.95 








ACTIVISION 
(C-64/128) 
Alter Ego 28,75 
Hacker 18.75 
Little People. 20.75 
Game Maker. 24,75 
Borrowed Time ...... 18.75 
Space Shuttle ,,...., 18.75 
Music Studio 22.75 
Mind Shadow 18.75 
Road Race. 18.75 
Fast Tracks 22.75 
Count Down 18.75 
Basketball 18.75 
SUBLOGIC 
Nightmission 
Pinball 18.95 
Flight Simulator......29.95 
Set Simulator 25.95 
Football 25.95 
Scenery Disk ,., Each 14.95 
Sot 1-6 69.96 
BATTERIES 
INCLUDED 
Paperclip 95.95 
Consultant 35.95 
Paperclip 
W/Spell Pack. ..... 48.95 
BRODERBUND 
The Print Shop. 24.75 
Graphics Library 
Wt 15.75 
Karateka 17.75 
Bank Street Writer. .. 29.75 
Lode Runner 19.75 
Printshop Comp,,.... 24,75 
BankStreet Speller,.. 29.75 
Bank Street Filer ....29.75 
Bank Street Mailer... 29.75 
Championship 
Lode Runner 19.75 








ssi 
Colonial Conquest, .. 22.75 
Wings of War 22.75 
Computer Ambush... 32.75 
Field of Fire... ,)...22.75 
Fighter Command... 34.75 
Kampfgruppe........34.75 
Mech Brigade .......34.75 
Market Garden 22.75 


‘Sux Gun Shootout... 22.75 
Computer Baseball, .. 22.75 








Computer 

Quarterback 22.75 
Imperium Gal 22.75 
Phantasie. .. 22.75 





Cartels & Cutthroats. .. 22.75 
50 Mission Crush... 22.75 


Questron 1122.75 
Gemstone Warrior ... 22.75 
Battellion 

‘Commander .......22.75 
Panzer Grenider.,...22.75 
Norway 85. Vine 22.75. 
USAAF, 1684.75 
Battlegroup, 34.75 
NAM. 22.75 
Phantasie I! 22.75 
Wizards Crown 22.75 


Rings of Zelphin.....22.75 


ACTIVISION 
(Amiga) 
Hacker 26.75 
Mind Shadow 26.75 
Music Studio 34.75 
Borrowed Time ...... 26.75 
ACCESS 

(C-64 — Amiga) 
Leader Board........24.75 
Leader Board 

Amiga .. 24.75 
Tournament | 12.75 
MACH 128 28.75 
1oth Frame 24.75 






































C.ITOH | STAR 
1550 SP+ ALL 
Dr040 CALL OKIDATA EP: MICRONICS 
Prowriter Junior......CALL  Okimate 10XE 1.179 JUKI SON LV 12410 (NeW)... CALL 
Prowriter8510SP>...CALL 292 CALL Juki6100 cau, ExBO cat Ne Sa 
293 CALL 5510 Juki CALL f A 
Okimate 20ST 199 f Dx10 CALL NBS. CALL 
PANASONIC zoho S205 RSzseSeialBoad..-as —(S0.- cau) gets Catt 
108 195182 214 a : 
1091 23192 343 100 Tractor iia FX286 GA | Sato ortenay 
3131 ” 93 CALL 
1092 ....., 1309 16100 Sheet Feeselsst 2095" Lq1000. CALL SRO vss M88 
1892.0... 419 SR15 878 
1695 +0505 SB+10 689 
DIABLO 
SEIKOSHA 025. Sr O4D 
‘SP-1000 VC (C-64) ....175 808. LEGEND 148 Be cal ei qnee 
SP-1000 ACentronics... 195, . . seeee 
SEIMEI ag QC TIZEN |, 3a CHE SILVERREED  Ratjee oie 
SEO0OABAppIelIO. 188 iso 285 «1385 289 © EXP.420P, CALL Sat ia gone 
P-1 pple 
P= 385 EXP 600P 489 
gigecocccee Meee = Breer cee) oot eae 
Re: > 485 
389 Premier 38 ss | BROTHER 951 Sheol Feoder.... 529 
HR-15XL-S 359 999 
1149 
HITACHI nVANASONIC THOMPSON Fi 
TEKNIKA MM-1218 Varanwer TTL 139-365 12" RGB CALL ZENITH 
M10 +149 12".Greenie:-ce0-299  TRI22 MYF, ZVM 1220... +89 
Wiel apa aera M-1406 13” 12° Green'TTL. 139 NEC aus seu 
SSPE NCB sero Color W/Cable...179 C1213 12" AGB... 288 Mutisyne CALL 
CARDO XETEC DsI SUPRA 
G-Wiz (C-64) ar ‘Super Graphix 64 64 Messenger 64/128 39.95 1064 Modem (C-64) 49,95 
‘Super G (C-64)..... 54 Super Graphix SR 64 45 
C/? PS (C-64) 37 
TYMAC ORANGE MICRO COMMODORE 
Connection (C-64). 49 Grappler CO (C-64), 79 1670 Modem is5 Compuserve....18.95 


In PA 717-494-1030 
Customer Service 717-494-1670 
<= orsendorderto — 
eg Lyco Computer 
> P.O, Box 5088 
Jersey Shore, PA 
17740 





In stock tems shipped within 24 hours of order. No deposit on C.0.D. orders, Free 
shipping on prepaig cash orders within the continental U.S, Volume discounts avai!a- 


RISK FREE POLICY 





ble. PA residents add sales tax, APO. FPO. and international orders add $5.00 plus 
3% for prority mail service. Advertised prices show 4% discount for cash, add 4% 
or MasterCard and Visa. Personal checks require 4 weeks clearance betore shipping 
We do not guarantee compatiblity. We only ship factory fresh merchandise’ Ask about 
UPS Blue and Red label shipping. All merchandise carried under manufacturer's 
warranty Retumn restriction applicable, Return authorization required. All tems subject 
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Math Attack 


four levels of difficulty. 


Many of today’s educational pro- 
grams don’t hold a child’s atten- 
tion, Others do—but they’re better 
as games than as educational tools. 
My goal in writing “Math Attack” 
was to present a riveting game— 
with lots of color and sound—in 
which math problems played the 
central role, That way, players 
would receive painless drills in the 
basic math skills. I designed the 
math problems as sprites, so they 
could move smoothly about the 
screen to play an active role in the 
game. 

Math Attack is easy to learn 
and easy to play. The premise is 
fairly simple: Sets of math prob- 
lems have begun to descend upon 
an almost helpless city, and the 
only weapons available to defend it 
are the correct answers, In testing 
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Dan Dickerman 


School children of any age can sharpen their 
math skills with this clever educational program 
for the Commodore 64. It offers a choice of addi- 
tion, subtraction, and multiplication challenges at 


this game, I found that many of the 
young testers quickly overcame 
their initial fear of math problems 
once they saw how easily a de- 
scending swarm of them could be 
eliminated, 


The Player’s Choices 

After typing in the game and saving 
a copy, load it and type RUN. The 
screen is cleared and the city assem- 
bled. The player is then asked 
which type of problem he or she 
wishes to tackle: addition, subtrac- 
tion, or multiplication. To respond, 
press either the +, —, or x key, I 
used the letter x to represent multi- 
plication because it’s similar to the 
symbol children use in school. Also, I 
avoided division to lend a more 
common appearance to the prob- 
lems and to avoid other complica- 





tions such as fractions and long 
decimals. 

The player next chooses a start- 
ing level of difficulty (selected by 
pressing either 1, 2, or 3) in which 
upper limits are set on the sizes of 
the numbers in the incoming prob- 
lems, This also provides the player 
with slower starting speeds at high- 
er levels—a kind of reward for 
choosing a more difficult problem 
to begin with, 

Now the onslaught begins. 
Three math problems appear in the 
sky, descending menacingly to- 
ward the city, The player enters an- 
swers from the keyboard, and 
launches them via the RETURN 
key. The — key should be used 
before the answer if a negative val- 
ue is required, and typos may be 
erased using the INST/DEL key. A 
correct answer destroys an attack- 
ing problem and lifts the sprite 
(math problem) beyond the top of 
the screen, where it soon reappears 
as a new problem, An incorrect an- 
swer sends the whole set of prob- 
lems closer to the city or, in some 
cases, increases the rate of their de- 
scent. If a problem reaches the city, 












school. 


Three new books 
from COMPUTE! 
bring you fully tested 
and completely 
documented machine 
language program- 
ming tutorials, excit- 
ing games, valuable 


utilities, and easy-to-use applica- 
tions for home, business, and 





Exceptional new books from COMPUTE! for your 64 and 128. 





Mapping the Commodore 128 

Ottis R. Cowper 

This clearly written, comprehensive memory map 
and programmer's guide, written by the technical 
editor of COMPUTE! Publications, provides a de- 
tailed explanation of the inner workings of the 
Commodore 128 computer. Topics include mem- 
ory management, BASIC 7.0, 1/0 chip registers, 
the operating system, system RAM, and much 
more. This is an important reference for both 
BASIC and machine language programmers. 
$16.95 ISBN 0-87455-060-2 








COMPUTE!’s Machine Language Games 
for the Commodore 64 

Edited 

This collection of the best machine language 
games from COMPUTE! magazine and COM- 
PUTE!'s Gazette is a must for 64 game players 
and machine language programmers. The book 
includes both the source code (studying these 
listings is an excellent way to improve your ma- 
chine language rogramming) and object code for 





able for $12.95 which includes programs in the. 
book, 610BDSK. 


$16.95 ISBN 0-87455-061-0 





The Complete 64 

Edited 

‘A book/disk combination with seven powerful, 
sophisticated applications on disk. The book has 
complete, easy-to-follow documentation for each 
of the six applications. It features SpeedScript 
and SpeedCalc, COMPUTE!'s commercial-quality 
word processing and spreadsheet programs; 
“Plus/Term,” an easy-to-use, yet versatile, tele- 
communications program; and “Sidplayer,” a 
powerful music editor and player. ““Hi-Resolution 
Sketchpad,” “Ultra-Font +,” and “Mini-filer” are 
also included. All the applications are on a disk 
ready to load and use on the Commodore 64 and 
128 running in 64 mode. 

$29.95 for book/disk package 

ISBN 0-87455-062-9 














Visit your local book or computer store and ask for one of these new summer releases from COMPUTE! Books. 


You can order directly from COMPUTE! by calling toll-free 800-346-6767 (ih NY 212-887-8525) or writing COMPUTE! 
Books, P.O. Box 5038, F.D.R. Station, New York, NY 10150. 


Please include $2.00 per book or disk for shipping and handling in U.S. and surface mail or $5.00 per book airmail. NC 
residents add 4.5 percent sales tax. NY residents add 8.25 percent sales tax. 


Please allow 4-6 weeks for delivery. 


COMPUTE! Publications, Inc. S 


Port of ABC Consumer Magazines. inc. 

‘One of the ABC Publishing Companies 

825 7th Avenue, 6th Floor, New York. NY 10019 

‘Retanon of COwPute COMPUTE! Gazeta, COPE 
tA‘! ST Dax ond 





1 Gazette Dae, COMPUTE! Books. CONPUTETs Apcse 


225. 


COMPUTE! books are available in the U.K., Europe, the Middle East, 
and Africa from Holt Saunders, Ltd., 1 St. Anne's Road, Eastbourne, 
East Sussex BN21 3UN, England, and in Canada from McGraw-Hill, 

Ryerson Ltd., 330 Progress Ave., Scarborough, Ontario, Canada M1P 
































FOR THE 64 AND 128 COMPUTERS 
BELOW ORIGINAL WHOLESALE 
PROGRAMMING AIDS VIDEO ARCADE PUBLIC DOMAIN 
Assembler $15 | Kickman (C) $5 | Business $3 
Super Expander (C) 12 | Clowns (C) 5 | English! $ 
Pilot 14 | Visible Solar System (C) 6 cool in : 
Screen Editor 12 | Tooth Invaders (C) 6 Ereieh Vv 3 
Blue Print (C) 6 Enalish v 3 
EDUCATION & LEARNING | solar Fox (C) 8 English VI 3 
A Bee C's (C) $6 | Star Rangers (C) 8 | English Vil 3 
EZ Match/EZ Count 6 | Viduzzles (C) 8 | Math! 3 
Whats Next 6 | Satan's Hollow 0 | Math it 3 
i 6 | Triad 9 | Math ill 3 
Fishmetic wea alee $ 
INFOCOM MIND GAMES Math V 3 
Rally Speedway 100) Mains 3 
Zork It $11 | NOTE; ALL SOFTWARE | Math Vil 3 
Zork Ill 11} 1S ON DISK EXCEPT | Math vill 3 
Suspended 11 | WHERE NOTED WITH A | Science! 3 
Starcross 11 | (C) WHICH IS ON CAR. | Science II 3 
Deadline 11 | TRIDGE. Science Ill 3 
Science IV 3 
ORDERING INFORMATION: For fast delivery send cash- | Technology 3 
iers check or money order. Personal checks allow 3 weeks | History 3 
to clear, COD charges $3.00. Please add 5% for shipping | Games Ill 3 
and handling with a $3.00 minimum. Florida residents 
please include 5% sales tax. All goods are new and factory sealed. All sales are final 
S & RMARKETING TOORDER CALL TOLL FREE 
P.O. BOX 9597 IN FL CALL 305-685-5423 
CORAL SPRINGS, FL 33075-9597 BETWEEN 9 a.m.-4p.m.E.T. MONDAY - FRIDAY 











MASTER COMPUTERS 
IN YOUR OWN HOME 


Now you can write programs and 


LEARN AT YOUR OWN PACE 
IN YOUR SPARE TIME 

Our ode stay progam alows you 

19 earn about computers, operat 

catlons and programing in your sp 

home. Ou nstructors prove yo 








LEARN EVEN BEFORE YOU DECIDE ON A COMPUTER 
Everything is explained in simple language. You wil enjoy learring to 
| use a computer—EVEN IF YOU DONT OWN ONE. Learn to program on 
| any personal computer; IBM, APPLE, COMMODORE, TRS, ard mare 


BE YOUR OWN COMPUTER EXPERT 
Programming (s the best way to learn to use computers, and we can 
show you the best—and most economical way to learn programming! 
Send today for your free information package. No obligation. No | 


salesman will call, 


halix coven 
INSTITUTE 


enon 
J rary 

















| LEARN 
PROGRAMMING 











CONVERSE WITH 
YOUR COMPUTER 


‘AT LAST! A FULL IMPLEMENTATION of the original ELIZA pro- 
ble to run on your Commodore 64! 
1986, ELIZA has become the world's most 


‘original program so fascinating, 

Now, our new Commodor 

and range of expres 

Inroducor rc of only $25 And tou 

oes it (or teach her 

SOURCE PROGRAM for ony $20 ucsttion 

rae your cap of ELIZA today andy jn wonder how 
someone say, "Okay, let's see what this 


ELIZA”. A.convincing der 


Delightul entertainment...An ideal medium for showing off your 
=MICROCOMPUTING MAGAZINE 
astounding piece of software... Atascinating program 
ludy” BARON'S MICROCOMPUTER REPORT: 
{9 ntroduce you ends to comput 
PETER A McWILLIA 
bona program one that's unto ue, shows ot 
has great hs 
T POPULAR COMPUTING MAGAZINE 
This version of ELIZA is the best we have seen. AS aparty game, t 
lsunmatched HOME APPLICATIONS FOR THE C64 
ELIZA IS AVAILABLEINT) 
(Please specity 
1. Protected Version 
(Protected Version can be run but notiisied ot moditiod) 
2. Un-protected Commodore 64 BASIC 
(Source Version can be listed ang 
inversions include a six 
Please 264 $2.00 shipping and handing tall orders 
(Caltorna residents please aga 619% sales tax) 


ARTIFICIAL INTELLIGENCE RESEARCH GROUP 


MG,VISA.and checks accepted 





all 








Borms Vou HIssto: 2 


aksucke 11 


Three menacing multiplication problems 
descend toward the city—and the only 
defense is the correct answers. 


it explodes into a cloud which then 
retreats to the top of the screen. It 
then regenerates as another prob- 
lem to fall from the skies. 

After 20 problems have been 
correctly answered, the player is in- 
formed that the level has been com- 
pleted, and that the new limits on 
the problems’ sizes have been in- 
creased by a factor of ten. In all, 
there are four basic levels, with 
combinations of one-, two-, and 
three-digit numbers, the highest 
level having problems comprised of 
two- and three-digit numbers. This 
final level cannot be accessed di- 
rectly at the start of the game. It can 
only be reached by progressing 
from the lower levels. 

The game ends either when 
the fourth level has been success- 
fully completed (that is, 20 prob- 
lems on this level have been 
correctly answered) or after three 
problems have reached the city and 
exploded on its surface, At the end 
of the game, the player is presented 
with the number of correct and in- 
correct answers given during the 
course of the game, and the number 
of math problems reaching the city 
(which will always be three, unless 
the player completes the fourth lev- 
el). It’s up to the parent or teacher to 
decide whether the student may use 
a calculator. 

When played by children just 
learning to solve simple math prob- 
lems, Math Attack provides an ex- 
citing and effective drill of the 
basics, which increases in difficulty 
as their skill grows. For us older 
kids, it will stump the best of us on 
its higher levels. In fact, I challenge 
anyone to keep the city intact 
through the fourth level in multipli- 
cation without using a calculator. 
See program listing on page 112. @ 











reviews 
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The FSD-1 Disk Drive 


Just when everyone thought the Com- 
modore 64 was on its last legs, the ar- 
rival of new, improved, and innovative 
hardware and software products not 
only revived the 64, but stretched its ca- 
pabilities to new limits. 

In the hardware area, new peri- 
pherals are faster and more sophisticated 
than their predecessors. Collectively, 
third-party manufacturers have devel- 
oped products which have expanded 
the capabilities of the 64 and improved 
the overall quality and reliability of 
Commodore computer peripherals. 
One such entry into the market is the 
FSD-1, a 1541-compatible disk drive 
from Emerald Components Interna- 
tional (ECI). Produced in Japan by the 
original manufacturer of Commodore’s 
1541 drive, the FSD-1 is a significant 
improvement over the 1541: It’s less ex- 
pensive, sturdier in construction, and 
more reliable. 

Inspecifications, the FSD-1 is iden- 
tical to the 1541 in capacity (174K stor- 
age, 144 directory entries, 256 bytes per 
sector, 35 tracks), and while the FSD-1 





has somewhat faster data loading and 
writing speed, it is not a speed demon, 


Capacity and speed are two sacrifices 
necessary to obtain true compatibility 
with the 1541, A mistake some other 
1541 compatibles make is to try to im- 
prove speed and capacity, but this only 
yields significant impairment of com- 
patibility with the 1541 and software 
designed to run on the 1541. The FSD- 
1, however, does have a larger memory 
buffer than the 1541. Also, its reliability 
is superior to that of the 1541, with an 
average MTBF (mean time between fail- 
ures) of 8000 hours. 

The FSD-1’s shape is sleek and its 
construction is sturdy. It’s considerably 
smaller than the 1541, with dimensions 
of 2-3/4 X 6-3/8 X 13 inches. It 
weighs 6-1/4 pounds. The FSD-1 has a 
metal case which, combined with the 
built-in solid state power supply, al- 
lows the FSD-1 to run cool and avoid 
the overheating problems of the 1541. 
It also eliminates any of the radio fre- 
quency interference sometimes associ- 
ated with the 1541 and its plastic case. 
In operation, the FSD-1 runs quietly, 
with only an occasional faint whirring 
noise to give you a clue that the drive is 
in operation. The only head knocks I 





heard using the FSD-1 were caused by 
software copy protection. 

As you would expect, the FSD-1 
has dual serial ports to daisychain disk 
drives and printers. An unexpected 
(and welcome) feature, however, is a 
DIP switch on the bottom of the drive 
to permit the drive’s device number to 
be changed. You can easily change the 
number of the drive to 9, 10, or 11 with- 
out the need to open up the case and cut 
and solder wires (as you must do with 
the 1541 to permanently use it as a sec- 
ond drive). 

The user's manual accompanying 
the FSD-1 is brief, but has a complete 
explanation of setup instructions, disk 
commands, and troubleshooting tips. 
Since the manual is a bit short on tech- 
nical data, advanced users may wish to 
write ECI for more information. The 
FSD-1 is warranted by the manufactur- 
er for six months, which is three 
months longer than most computer pe- 
ripheral warranties cover. 

Where the FSD-1 really shines is in 
its compatibility with software de- 
signed to run on the 1541, The FSD-1 
appears to be truly 100-percent com- 
patible with the 1541, Every piece of 64 
software I tried (over 300 programs) 
loaded on the FSD-1. The programs I 
loaded using the FSD-1 included some 
of the latest available and have some of 
the most complicated copy protection 
schemes: The Newsroom, GEOS, Paper- 
back Writer (now Pocket Writer), Viza- 
star, and Elite. GEOS was a particularly 
good test of the FSD-1, since it not only 
has sophisticated copy protection, but 
also utilizes its own operating system, 
has a built-in disk drive speedup fea- 
ture, and implements a virtual memory 
routine that requires extensive disk ac- 
cess. The FSD-1 performed flawlessly 
with GEOS, 

Loading has been a problem with 
some compatible disk drives, since 
copy protection schemes often depend 
heavily on the intricacies of the 1541 
ROM. This apparently is not the case 
with the FSD-1. In fact, the FSD-1 is 
more compatible with the 1541 than 
the Commodore 1571. The FSD-1 can 
load several programs that the 1571 has 
problems with (or at least had problems 
with until the software manufacturers 
corrected the incompatibility diffi- 
culties). 
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COMMODORE 64 
COMPUTER 


(Order Now) 


$ 14975 


* C128 Disks 44° ea.* 
* Comstar Writer 64 $19.95 
* 13" Color Monitor $139.95 


C128 Commodore 
Computer & 
1571 Disk Drive 


7a99°° 


* Voice Synthesizer $39.95 
* 12" Monitor $79.95 


CALL BEFORE YOU ORDER SPECIAL SOFTWARE COUPON PRICES MAY BE LOWER 


COMMODORE 64 
SYSTEM SALE 


Commodore 64 4). 630.00 saH 


Com. 1541 
Disk Drive 
13" Color 
Monitor 


(Lid. Qty) 



































COMMODORE 64 COMPUTER 3129.05 fam We Peck @ SPECIAL SOFTWARE DISCOUNT 128 COMPUTER & 1571 £499.00 
You pay only $149.95 when you order the COMPUTER, DISK DRIVE, PRINTER, or Now you can get the C128 Commodore computer 





powerful 84K COMMODORE 64 COMPUTER! LESS. wer I & the 1571 Disk Drive for one low price of only 
the volue of the SPECIAL SOFTWARE DISCOUNT fill MONITOR wo sell! This coupon allows you TMM $50 09” ar 8690.00 

COUPON we pock with your computer that ellows Sate $499.00 

you to SAVE OVER $250 off software sale prices! ! 
















With ‘only $100 of savings opplied, your net (Examples) 340K 1571 COMMODORE 
SRS PROFESSIONAL SOFTWARE Double Sided, Single Disk Drive for C-128 allows 
* €128 DOUBLE SIDED DISKS 44: EA. COMMODORE 64 you fo use C-128 mode plus CPM mode, 17 times 





Get these 5!" Double Sided Floppy Disks faster than 1541, plus runs all 1541 formats. 
specially designed for the Commodore 128 List $349.00, Sale $259.00. 
Computer (157) Disk Drive). 100% Certified. 



























Name List Sale Coupon 

Lifetime Warranty, Automatic Lint Cleanin SSN SEN SUPER AUTO DIAL MODEM $29.95 

Liner included. 1 Box of 10- $4.40 . 5 Boxes of 1 Sain aay gsusaiesaanes Easy to use. Just plug into your Commodore 64 

-$22¥00., 10 Boxes of 10 $44.00 . Boxes of 10 limit 1 Boord $5995 $2095 $22.95 computer vond! you're ready to. transmit. ond. 

1,000. (Add ,50 per box for shipping & hondling) iat shop $4495 $27.95 $26.95, jive messages, Easier to use than dialing your 
$ Project $29.95 $22.95 $19.95 just push one key on your computer! 

13" COLOR MONITOR $139.95 4 sop 95siaes alaes i nyo P 
You pay only $139.95 when you order this 13 Voce Command Module. $79.98 $09.95 $04.95 iclusive easy to use program for up and 


down loading to printer and disk drives. 
COLOR MONITOR, LESS the value of the SPECIAL Nine Princes in Amber $32.95 $24.95 $21.95 
SOFTWARE DISCOUNT COUPON we pack with SuperBowl Sunday $35.00 $22.95 $19.95 Bost In U.S.A. List $99.00. SALE $29.95. 


Your monitor that allows you to save over $250 off Ny HRN OER REE 

Proday sick 12.95 $10. 
software sale prices! | With only $100 of savings Periyivare S995 $1495. $11.98 VOICE SYNTHESIZER $39.95 
applied your net color monitor cot i only $9795 Dentcover Sas Saas $4a0 For Commodore 64 computers, Jus! plug it in ond 













you can program words and sentences, adjust 






Promium Quallty 150-170 cps nengiv@Perier $39.98. $00.98. $05.95 elome ood pia meke talking cavecture games: 
Comstar Aero 160 Printer $199.00 Cé4 Troubleshoo! & sound action games ond customized talki 





$24.95 $15.95 $12.95 PLUS ($19.95 value) TEXT TO SPEECH program 





on ives you a 10” carriage, Repair Guide P 

150-170 Crs, 9 » 9 dot reairix with double siike included FREE, just type 9 word and hear your 

capability for-18 % 18 dot motrix. (near. letter computer talk — ADD SOUND TO "ZORK", SCOTT 
Pip) cnigheesslation bh (120 x 144 do (See over 100 coupon items in our catalog) ADAMS AND OTHER ADVENTURE GAMES! ! (Disk 

quality), high resolution bit image (120 x 144 dot SAR NU Ba Gel 

matrix), underlining, back spacing, left ond right Write or call for NCES: . . 

margin setting, true lower decenders with super Sample SPECIAL SOFTWARE COUPON! SSA ee 

ond subscripts, prints stondord, block graphics TARAITCOR a 7OOs 

‘and special characters. It gives you print quolity OS 

and fectbren found iontpriectscoei paiisicalon SUP UIpi Nee stallorholearecreen noone eet 

much!! (Centronics Paralfel Interface) List $499.00 ENN et NERS 

Sale $199.00. wordprocessing . Fantastic value. 


List $129.00. Sale $79.95. 
v'samauno ontensceeenwonron fA SWE ING TR OINE || 228285222 sor caiesv.09 


Super High Resolution composite green screen 


































monitor, Perfect for 80 column use with The C128 PRINTER/TYPEWRITER 
computer (Req. $19.95 Cabl COMBINATION 9.95 
i $129.95 Sale $59.95 Computer Clubs Superb letter aualiy, vdatey Swit ye} 
r/typewriter combination, Two machines in 
We Offer Big Volume Discounts y Fe oriheae hie tearetlcrae 






80 COLUMNS IN COLOR keyboard, automatic margin 
COMSTAR WRITER 64 WORD PROCESSOR $19.95 CALL TODAY! Shral scomnncch Nabheslantseoreomseoesente 
This COMSTAR WRITER 64 WORD PROCESSOR is ribbon! (90 day warranty) centronies_ parallel 
the finest available for the COMMODORE 64 interface Built -in. List $249.00. SALE $199.95. 
computer! The ULTIMATE FOR PROFESSIONAL (td. Oty.) 
Word Processing. DISPLAYS 40 or 80 COLUMNS IN PROTECTO WARRANTY 
COLOR or black and white! Simple to operate, [f All Protecto's products carry a minimum 90 day warranty 14" RGB & COMPOSITE 
powerful, text editing. ‘complete. curser and ff Htanyihing foils within 90 days from the date of purchas. COLOR MONITOR $239.95 
insert/delete key controls line and paragraph ff simply send your product to us vio United Parcel Ser Must be used to get 80 columns in color with 80 
Hae ee ere cee h ie alton Sonterirt east ff Prepaid, We will IMMEDIATELY xond you a replacement at Pi Cjuinn comauiesy {C128 - IBM. Apple), (RGB 
fetings and eutput to ell printers! List $99.60, J ne chorge ve United Parcel Service propold This warranty Hl Cable 319.95) Aad $14.50 shipping 
SALE319.95, Ltd. Qty Closeout Item proves once again that We Love Que Customers. $299.00. SALE $239. 















* LOWEST PRICES * 15 DAY FREE TRIAL RRONECRDERS * 90 DAY FREE REPLACEMENT WARRANTY 


+ BEST SERVICE IN U.S.A. *ONEDAY EXPRESSMAIL 2." “ BP-m. C-S.1. Wookdoys * OVER 500 PROGRAMS * FREE CATALOGS 


PROTECTO 


We Love Our Customers 
22292 N. Pepper Rd., Barrington, Illinois 60010 
312/382-5244 to order 





|Add $10.00 for shipping, handling, and insurance. Illinois residents please add 
16% % sales tax. Add 20.00 for CANADA, PUERTO RICO, HAWAII, ALASKA, 
APO-FPO orders, All orders must be in U.S, Dollars. WE DO NOT EXPORT TO 
OTHER COUNTRIES EXCEPT CANADA. Enclose Cashier Check, Money Order or 
Personal Check. Allow 14 days for delivery, 2107 days for phone orders, 1 day 
loxpress mail, Prices & Availability subject fo change without notice, 


VISA — MASTER CARD — C.O.D. C.O.D. on phone orders onl; 





Farnous National Brand 


We Like this Printer so much 


© Word Processing ® Program Listings ®° Graphics ° Quiet 
Operation ° Upper and Lower case ® All points addressable 
Graphics ® Underline ¢ Enhanced ® Much much More 


Super Print Quality 


This printer was made by Canon® for 
one of the largest computer 
manufacturers in the world. The Big 
Blue printer comes ready to hook up 
to the serial port of the IBM@®PC jr. 
Plus with low cost adapter cables you 
can connect the Big Blue printer to the 
IBM®PC, IBM®XT, IBM@AT, 
IBM Compatibles , Apple®II, Ile, IIc, 
Apple Compatibles, Commodore® 
| 64,128, Atari®, plus many more. 
* 90 Day Immediate (Also VIC 20) 


Replacement Warranty © 15 Day Free Trial-Satisfaction or Money Back 


Now you can have a full fledged 8'4’’ letter size 80 column printer for less than the cost of a large 
box of paper. This printer uses advanced thermal technology to print upper and lower case (with 
true lower descenders), underline, enhanced, all points addressable graphics (works with Print- 
shop) plus More. Print out pictures, program listings, wordprocessing pages, graphics and more. 
Perfect for the homeowner or student and definitely affordable. Fantastic Printer at an unbeatable} 
price. List $199.00 Sale $39.95 Paper (2 Rolls) List $19.95 Sale $9.95 
Intelligent Commodore Interface— Allows you to Intelligent Atari Interface— Allows you to connect 

connect the Big Blue printer to the printer port of the the Big Blue printer to Atari computers (except 1200), 
Commodore 64 and 128 computer. Print Commodore Print Atari graphics, Printshop ,word processors, and 

graphics, use Printshop, Word processors and more... __ more... List $49.95 Sale $24.95 

List $49.95 Sale $24.95 


IBM@®PC,AT,XT,PC Jr. Apple® RS-232 Adapter— Adapts the Big Blue printer to be used with any RS- 


nee eee Sale $9.95  APPlell.tl plus,lic,lle, Atari 520 ST,Laser128, Amiga interface— List $24.95 Sale $12.95 


IBM. Apple. Conon. Commodore. Aior| are trademarks of International Business Machines, Apple Compuler, Canon Inc. Commodore Business Machines, Atari Inc. Respectively. 


PROTECTS 


We Love Our Customers 
22292 N. Pepper Rd., Barrington, Illinois 60010 


312/382-5244 to order 











|Add $10.00 for shipping, handling, and insurance. Illinois residents please add 
16'% % sales tax. Add 20,00 for CANADA, PUERTO RICO, HAWAII, ALASKA, 
JAPO-FPO orders. All orders must be in U.S. Dollars. WE DO NOT EXPORT TO 
JOTHER COUNTRIES EXCEPT CANADA. Enclose Cashier Check, Money Order or 
Personal Check. Allow 14 days for dalivery, 2107 days for phone orders, 1 day 
lexpress mall. Prices & Availability subject to change without notice. 


VISA — MASTER CARD — C.O.D. C.O.D. on phone orders only. 














Commodore Software Sale 















For more information send 
for a free catalog today! Phone Orders Call 8 to 8 C.S.T.-M-F 

(T) Tape, (C) Cartridge, (D) Disk 212-382-5244 

Access BA Epyx Spinnaker 
0360 Jet Combat (D)........ $18.95 5300 Alphabet Zoo (C)... 

ge ial fo) nes ee RCTS) ES oe Sa 

CURR ORT EORRS Reo OS 6065 Super Cycle (D).. -- $20.95 5301 Facemaker (C) .. 
6010 10th Frame (D) “359195 0982 Summer Games 2 (D) ..$20.95 5303. Kindercomp (C).... 


5210 World Karate Champ (D) $18.95 3077. Number Tumblers (C). 


3033 Beachhead 2 (D) . $19.95 


045] Beachhead (Dor 1) ....$17.95 C262 WG. Baseball (0)... $18.95 3078 Sea Spollers (C) ... 
0752 Raid Over Moscow (D)..$19.95 Mindscape 3076 Up & Add ‘Em (C) .. 
Accolade 3702 Bop'N Wrestle (D)...... $19.95 


Fisher Price 
3095 Alpha Build (C) 





_$17.95 5118 The Halley Project (D) 
$17.95 5120 Indiana Jones (D) . 
“$17.95 3690 Infiltrator (D) 3070 Dance Fantasy (C) . 
“$17.95 5916 Lords of Midnight (D)....$9.95 9069 Linking Logic (C). 
5950 Hardball (D)..........$17.95 5912 Luscher Profile (D).....$19.95 3072 Memory Manor (c) ....- 
5952 Law of the West (D) ....$17.95 Strategic Simulation Inc. RRR RRERRS 
5956 PSI 15 Trading Co. (D) ..$17.95 1561 Battle of Antietam (D). .$27.95 Weekly Reader 

Avalon Hill 5156 Colonial Conquest (D) ..$22.95 9515 Stickybear ABC (D) $14.95 
5140 Black Thunder (D)......$14.95 3021 Computer Baseball (D)..$22.95 5130 Stickybear Math (D).... $14.95 
0396 Super Bowl Sunday (D) .$19.95 6002 Gettysburg (D) $32.95 9512 Stickybear Numbers (D) $14.95 
5234 Season Disk (D) .......$12.95 1565 i $32.95 5132 Stickybear Reading (D) . $14.95 
3576 The Masters (D). . -$14.95 6036 --$22.95 9516 Stickybear Shapes (D) .. $14.95 


ae Pebpleneon u(p) or Se 2 Educational 5129 Stickybear Typing (D) .. $14.95 
2375 Computer Title Bout (D) $19.95 American Educational Computer Miscell. 
Broderbund 2521 AEC Spelling (D).......$19.95 SCe Reus: 
2499 Biology Facts (D)... -$9.95 
5986 Where is Carmen REE 2496 French Vocabulary (D) .. $9.95 Batteries Included 
2905 Kerataka (D) “$19.98 2495 Spanish Vocabulary (D)..$9.95 6060 Home Inventory (D)..... $8.95 
Batis 5 nner (D) “$19.95 2493 Grammar Word Use (D). . $9.95 6062 Address Book (D). 
AGN SS RO (by 3747 Learn to Read (D) $19.95 6064 Mail List (D)... 
oat eee o§19.95 3745. Phonics (D)...--. $19.95 6066 SSE (D) 
RNAS ‘95 2519 U.S. Geography (D).....$9.95 6068 Recipes (D).... 
~ SRR Lode Runner (D) $21.95 2520 U.S. Goverment (D) $9.95 6018 Keys to Typing (D) 
atasoft 2498 U.S. History (D) 6020 Cal-Kit (D).... 
9027 Conan (O) Designware 1284 Consultant (0). 
5218 The Goonies : Fee eee ANE LSSN Sooaige 
26 ON + D) ly Transparent or S t 
6026 Never Ending S' ery ( )- 2517 European Nations (D) . $17.95 Software Country 


6028 Mind Pursuit (D).. 0824 Grammar Examiner (D) $22.95 2633 Chessmaster 2000 (D) . . $26.95 


6022 Ace of Aces (D) ... 
6024 Deceptor (D).. 
5958 Dam Busters (D). 
§954 Fight Night (D) 
























































5220 Zorro (D) 0980 Mission Algebra (D) ...$22.95 3632 Golden Oldies (D)...... $17.95 
Electronic Arts 5102 Remember (D)........ $34.95 

5176 Carriers at War (D) .... 5105 Spelling/Reading Primer (9) Business 

8830 Dr.J&LarryBird(D)....$12.95 eee eee cece eee eeee 2.95 

5180 Heart of Africa (D). C128 Software From Timeworks 
6038 Lords of Conquest ( 0832 States & Traits (D)...... $22.95 5022 Word Writer (D) ....--. $59.95 





3601 Super Boulderdash (D) .$12.95 DLM 5024 Data Manager 2(D) . 
5192 Pinball Construction (D) $12.95 3806 Alien Addition (D) . $14.95 3048 Sylvia Porter (D). 
5178 Reach For Stars 2(D) ...$26.95 3808 Alligator Mix (D) .. $14.95 5030 Partner (C) ++» $39.95 
3840 7 Cities of Gold (D) . .$12.95 3800 Alphabet Circus (D) -$14.95 5026 SwiftCalc/Sideways (D) $39.95 


Add $10.00 for shipping, handling,,and insurance. IIlinois residents please odd 

6% % sales tax. Add 20,00 for CANADA, PUERTO RICO, HAWAII, ALASKA, 

JAPO-FPO orders. All orders must be in U.S. Dollars. WE DO NOT EXPORT TO 

IOTHER COUNTRIES EXCEPT CANADA. Enclose Cashier Check, Money Order or We Love Our Customers 

Personal Check. Allow 14 days for delivery, 2 to 7 days for phone orders, 1 day 

lexpress mail. Prices & Availability subject to change without notice. 22292 N. Pepper Rd., Barrington, Illinois 60010 


312/382-5244 to order 


















Famous Comstar National Brand 


0’ Printer Sale 


Includes Commodore 


Near Letter Quality | n t e rfa ce Near Letter Quality 
Best Value in the USA 


¢ 100 CPS draft/20CPS near-letter quality * Dot Addressable Graphics ¢ Adjustable 
Tractor and Friction Feed ¢ Automatic Paper Loading ¢ Right and Left Margin 

settings ° Pica, Elite, Condensed, Italics ¢ Superscript ¢ Subscript ¢ Underline, Bold 

print, Double Strike ¢ Superb NEAR LETTER QUALITY 









Warranty 












Fantastic 
Graphics 









The Comstar 1000 is one of the best values in the United States today. Print your letters, documents, prot ‘ams, 
pletures, and more at a blazing 100 Characters Per Second or 20 cps in the Near Letter quality mode. ( just 
ike it came from a typewriter. ) Plus, choose your printing mode (NLQ, Draft) from your wordprocessor or by 
simply pushing the controls on the front panel. Fantastic Quality at a Fantastic Price. List $349.00 SALE$179.95. 











Print Method Ribbon (Life exp.) Line Spacing 
Serial impact dot matrix (9 pin) Black; cassette (2.5 million characters) 1/6, 1/8, 7/72, and 1/216 Inch 
Print Spood Dimensions Pane taed 
Draft- 100 CPS NLQ- 20 CPS 15.4 (W) x 10.9 (D) x 4.7 (H) Inch Adjustable tractor and friction feed 
Character Sots Welght Paper feeding Direction 
96 ASCII Characters, Marker, Symbols Approx. 10 Ibs Bi-directional 
(includes Italic font) Character Spacing Copies 
Fixed 2 plus original 










Supply is Limited so Buy Today 


PROTECTS 


We Love Our Customers 
22292 N. Pepper Rd., Barrington, Illinois 60010 


312/382-5244 to order 






‘Add $10,00 for shipping, handling and insurance. Illinois residents 
please add 6% tax. Add $20.00 for CANADA. PUERTO RICO. HAWAII 
ALASKA’, APO-FPO orders. Canadian orders must be in U.S. dollars. 
WE DO NOT EXPORT TO OTHER COUNTRIES, EXCEPT CANADA, 
Enclose Coshiers Check, Money Order or Personal Check. Allow 14 
days for delivery, 210 7 days for phone orders, 1 day express mail! 
VISA — MASTER CARD —C.0.0. 
No C.0.D. to Canada, APO-FPO. 









In putting the FSD-1 through its 
paces, I daisychained the drive with a 
1571 and my Commodore 128. The 
drive operated perfectly. Since most of 
the 128’s software is still on single- 
sided disks and will probably continue 
to be for the foreseeable future, 128 
owners should seriously consider the 
FSD-1 as an inexpensive alternative to 
the 1571, especially as a second disk 
drive, 

Frankly, I have yet to find fault 
with the drive. It works well with 
Epyx’s Fast Load cartridge and Access’s 
Mach 128 cartridge. The drive runs 
smoothly, efficiently, and without heat 
buildup. It runs everything that the 
1541 will, and easily daisychains with 
other drives, The FSD-1 is one of the 
best of the new hardware offerings to 
come out for use with the 64 and the 
128. Considering all of its features and 
the price, I highly recommend the FSD- 
1 to 64 and 128 users, 

—Scott Thomas 


Emerald Components International 
Dept. DD414 

540 Willamette St. 

Eugene, OR 97401 

$139 





GATO 


The message from SUBCOM crackles 
over the radio: “Pilot down! Must res- 
cue, Coordinates 5100, 2100! Repeat: 
Must rescue!” 

You issue the command; ‘All 
ahead flank speed,” and turn to a bear- 
ing to take you to the given coordinates. 

As commander of a GATO-class 
World War II submarine, you have the 
responsibility of rescuing the downed 
pilot. You have 150,000 pounds of fuel, 
a chart of the area, radar, and 24 torpe- 
does, But your most effective weapon is 
surprise, 

As a precaution, you elect to sub- 
merge as you approach the area. You 
raise the periscope for a quick scan of 
the area, 

It’s a trap! The enemy, not SUB- 
COM, has summoned you here and 
you're surrounded by warships. Even 
as you fire your first fish, their first sal- 
vo destroys your radio room... 

Spectrum Holobyte’s GATO for the 
Commodore 64 is more of a game than 
a realistic simulation, The emphasis is 
on fun, It’s the arcade come home, and 
time spent letting loose a few torpedoes 
can let loose some steam as well. 

In GATO, you are the commander. 
Missions are assigned by a direct radio 
transmission from SUBCOM (SUBma- 
rine COMmander). You must carry out 
the missions while avoiding enemy at- 
tack. This involves keeping track of 
depth, speed, heading, diesel and bat- 
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tery power, oxygen consumption, and 
enemy movements, The opposition is 
both smart and aggressive. If—or 
when—your sub is detected, enemy 
forces will attempt to destroy it. 

You control the sub via one- or 
two-stroke keyboard commands—no 
joystick is required, Six screens are 
provided to help you command your 
vessel, 

The Control screen contains the 
control panel and periscope view. From 
this you control speed, depth, heading, 
periscope, power use (diesel/battery), 
and torpedoes. You also monitor oxy- 
gen level and enemy range. 

Navigational aids include a chart 
of the sub’s patrol area and a simulated 
radar display. The chart diagrams an 
aerial view of the waters. The radar 
screen is much like an actual one, track- 
ing enemy ships and noting island loca- 
tions relative to your sub. 

In any encounter with the enemy, 
you're likely to sustain some damage, A 
Damage Report screen indicates what 
areas of the sub have been affected. 
This is done either by list or by filling in 
sections on a cut-away view of the sub, 

The Ship’s Log displays the sub’s 
name, the number of missions complet- 
ed, the number of enemy ships sunk, 
and the total tonnage sunk. This log is 
automatic, so that information from 
each play session is added to that of the 
previous session. The log can be erased 
and a new one started if desired. 

The Parameters screen allows you 
to switch levels of difficulty (1-5) and 
to change the submarine’s coordinates. 

The manual is detailed and ex- 
tremely well written, providing play in- 
structions as well as a history of 
submarines. In addition, there is a re- 
movable easy-to-use reference card 
which saves flipping through the man- 
ual during play. Because of the manual, 
as well as the simplified nature of the 
simulation, GATO is easy to play. Not 
easy to win, just easy to play. 

GATO’s lesser sophistication 
means it has some limitations. There 
are only four directions in which you 
can look, either with the raised peri- 
scope or from the bridge. There is no in- 
dicator of sea-bottom contours or the 
depth of the water you're in. Although 








the more dramatic sounds of submarine 
operation are built into the program, 
there is no background engine noise. 
No sound is provided for running 
aground either. The graphics for the 
ships and islands are somewhat crude. 
The ships look like something made out 
of blocks rather than finely-defined im- 
ages. The islands, also artistically un- 
spectacular, all look alike. 

On the plus side, however, are sev- 
eral features, The radio messages are 
excellent, There’s a realistic “fuzzy” 
sound built into the transmission that 
makes you halfway expect to hear “‘To- 
kyo Rose.” The ‘“aauuugha” of the div- 
ing horn and the “ping” of the enemy 
sonar are reminiscent of late night sub- 
marine movies, The explosions are 
done so well you can almost feel them. 
The sub responses are most appropri- 
ate—quick at high speeds, sluggish at 
low, Uncharted sandbars and dud tor- 
pedoes are thrown in just to make 
things more difficult—and realistic. 

The final plus is how easy it is to 
learn. One evening at the controls and 
you’re well into the challenge of match- 
ing your wits against those of the ene- 
my’s navy. Still, you must remember, 
World War II wasn’t won—or lost—in 
a day. It took many battles—and the 
challenge of many battles is what 
awaits you in GATO. 

—David and Robin Minnick 


Spectrum Holobyte 
1050 Walnut, Suite 325 
Boulder, CO 80302 
$29.95 





Phantasie II 


A few years ago, there were few excep- 
tionally good computer games, While 
this was unpleasant for the hobbyist 
who wanted more high-quality enter- 
tainment packages, it insured that the 
well-done games would be played and 
replayed until they were mastered. 
Things are different now. It seems 
safe to say that there are more computer 
games than most people can possibly 
find time to play, and many of them are 
good. What separates the games that 











are replayed from those that are not is 
addictiveness. 

Addictiveness, in games at least, is 
a personal thing. What addicts one per- 
son does not addict another. But we all 
know what it means—sitting up until 
all hours of the night, trying one more 
time to beat your high score, or to final- 
ly defeat the computer, or to complete 
the long, arduous quest, or to master 
the intricacies of a coordinated attack. It 
means waking up in the morning with a 
sudden inspiration about what to do 
next, and sitting at the computer for 
hours at a time working at the game in- 
stead of doing the word processing you 
ought to be doing. It happens, and not 
always when you would expect it. 

When I first examined SS!’s Phan- 
tasie, the forerunner of the Commodore 
64 game reviewed here, I was largely 
unimpressed. The graphics were func- 
tional but hardly dazzling, disk access 
(on my 64) was frequent and annoying, 
and game play was predictable. | per- 
sisted for a while, but my old standards 
drew me away. When the sequel, Phan- 
tasie II, came along, I expected more of 
the same, but, I thought, perhaps there 
were enough changes to make it more 
appealing. 

I don’t know if there are any signif- 
icant changes from the first game, but 
there has been a big one in my reaction. 
I am addicted to Phantasie II. I'm not 
quite sure why, since graphically it’s 
about the same as the original, and 
game play is virtually identical. But I 
am, nonetheless. I don’t even particu- 
larly like fantasy adventure games that 
demand killing monsters and getting 
treasure (which this game certainly 
does). Nor do I like waiting for my 
Commodore disk drive to reveal anoth- 
er part of Phantasie II’s world to me. But 
I do like this game. Too much, maybe, 
for my own good and that of my family. 

For a game to be addictive, it must 
possess several qualities. First, it must 
present a purpose, High score is one 
purpose, and most pure arcade games 
provide this. Winning the game is an- 
other, and this purpose is provided by 
all sports games, games with a time lim- 
it, and strategy games like chess and 
war games, Adventure games, however, 
depend on fulfilling the quest, the third 
type of purpose. 

Equally important, though, is the 
ability to achieve the game's purpose. A 
game that’s nearly impossible to crack 
will fail to addict all but the most dedi- 
cated gamer. An addictive game will 
allow the player to progress. Maybe the 
computer opponent is too tough at first, 
but if you can come close after a hand- 
ful of games, you'll continue to try. 

In Phantasie II, the quest is un- 


known (except through hints provided 
in the documentation) until the player 

















Answer: 1040ST™ 


Question: Which computer is the first 
in the world to give youl Megabyte of 
power for under $1,000? 


The 1040ST is a major breakthrough in personal computers. 
Indeed, it’s the world’s first computer with an original list 
price that represents less than $1 per kilobyte. 

To give you an idea of what an extraordinary accomplish- 
ment that is, let’s look at the price-per-kilobyte figures for 
some well-known competitors. 

The Macintosh.” for example, comes in at over $4 per 
kilobyte, the Amiga™ is over $5 per kilo- 
byte and the PC AT™ is a whopping $9. 

In contrast, the 1040ST comes in at 
an incredible 98 cents per kilobyte and 
a total price of just $999” for the com- 
plete system: CPU, disk drive and << 
high- resolution monochrome 
monitor. 


ATARI and 1040ST are trademarks of Atari Corp. 
‘Amigais a trademark of Commodore-Amiga, Inc. 
AT is a trademark of International Business 
Machines, Inc. 

Macintosh is a trademark licensed to Apple Computer, Inc. 
© 1986 Atari Corp, 













COMMODORE ACCESSORIES 


COMMODORE CHIPS 





For VIC-20, C-64 and C-128 Personal Computers 
Part No Price | PartNo. Price | PartNo, Price 














*6560VIC-1. 
*6567VIC-IL 
"6569. . 


NEW! 13" COLOR : COMPOSITE 
MONITOR FOR VIC-20 and C-64 
Aes compete with other 


*6525TPI, 





8721PLA. ... 4,95 
NOTE: 825100 = U17 (C-64) 
RS232 ADAPTER FOR 
VIC-20, C-64 and C-128 















Supat (ee Applet te. fe) Now 
Beato stor graphics! some i Compatible 
‘Recommended Dany Cha (m) With the C-128! 


Number: 960 Charactors 
(40 Characters x 24 Rows on 
‘5x7 dot matrix) 


“CRT, 13" agonal =buls 
‘Wight 254 tbs 


CMON. ....... ist 29.95 each or S218, 55 


RCAS-DIN Universal Computer to Monitor Cable... $3.49 
(Unix. Computer to Monitor Cables for Atari, Commodore & TI) 


JE232CM allows connection of 119232 printers, 
modems, etc. to your VIC-20, Ce ‘8% 64 Portable), 
and the 6-128, A pole switch allows the inversion of the 4 
Control lines. Compiete installation and oper. Instructions Incl 
“Pugs into User Port = Provides Sngera RG232 spa eels 
+ Uses 6 signals (Transmit, Receive, Clear to Send, Request to 
Send, Data Termin 


JE2Z32CM. wi... sees e eens sees 

















mander Deluxe Joystick for VIC-20 & C-64 
ose (CR-401). . $7.95 
















Parallel Prin 4 & C-128 
$39.95 | , 2K Butfer (Stock) — Add $4.95 for 10K Version 
IW350............ $54.95 











Voic 64 
aust Plug In = Talking in ante 


Gen. Purpose Input/Output Card for C-64 & C-128 
JES20CM. $99.95 14 $199. 
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makes some progress. What keeps the 
player going, though, is the promise of 
progress. A party of adventurers begins 
in a town, then leaves town for wilder- 
ness. There they encounter monsters of 
various shapes, sizes, and fighting abili- 
ties. In most cases they will fight to the 
death. Some beginning adventurers 
will die, but some will survive to return 
to the town and receive training, new 
spells, new weapons, and other forms 
of aid. Many games fail in one essential 
way: Progressing, and staying alive, is 
nearly impossible. In Phantasie II, 
though, as long as the player is content 
with adventuring for a short while, 
then returning to town, the game is rel- 
atively easy, Even beginning adventur- 
ers can survive long enough to improve. 

And improvement is fairly rapid. 
Before long, if you do things compe- 
tently, your party will be at the eighth 
level or above, and you can start doing 
some strong adventuring, Three levels 
of the Netherworld, and several beasts 
that serve Pluto and have special pow- 
ers, await an advanced party, Other in- 
triguing elements include the granting 
of divine spells—their uses unknown— 
to party members, And an amulet that 
teaches the party about beast runes, but 
not how to use them, And lots of other 
things. 

The quest itself, as in most of these 
games, is almost secondary. Getting 
there is definitely more than half the 
fun, and the game requires that you 
keep your wits about you, But it’s pri- 
marily a fighting game, and a good one 
at that. The monsters are many (annoy- 
ingly so at times), and some are deadly 
enough to strike fear into the player. 
The world is large enough to take hours 
to get through, and the magic spells are 
potent enough to make nonfighters 
consider investing in them. I wish there 
was more interaction and less emphasis 
on killing monsters and getting trea- 
sure, but the game pretends to be noth- 
ing else. If you like hack-and-slash 
fantasy adventuring, Phantasie II 
should serve you well. 

One hint, and only one. Listen to 
the crazy gnome that runs around the 
first dungeon. He's a bit machinelike. 
And the princess is a bit unpredictable. 
And...sorry—my addiction, you know. 

—Neil Randall 





Strategic Simulations 
1046 N. Rengstorff Ave. 
Mountain View, CA 94043 
$39.95 
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The Keeper 


I've always dreamed of turning on my 
Commodore 64 and having the DOS 
Wedge ready at my command, or may- 
be a machine language monitor, or 
even a word processor, utility, or game. 
I've wanted to show off my own pro- 
grams by having them placed on a car- 
tridge so they can start up immediately. 
Now I can. Thanks to the Keeper from 
Marvco Electronics, I can store just 
about anything I want in the cartridge. 

The Keeper cartridge is a very ex- 
citing and practical device with three 
important capabilities: It adds 8K of 
nonvolatile RAM memory to your com- 
puter (a 16K version is also being devel- 
oped); it can be programmed, and it 
offers autostart capability; and it has 
switch-selectable options that include 
RAM/OUT/ROM modes. 

What will the Keeper do, and how 
can these capabilities be put to practical 
use? In my experience, I’ve found that it 
does more than its enclosed literature 
and advertisements suggest. The car- 
tridge takes up the space at the top of 
BASIC memory—from 32768-40959 
($8000-$9FFF)—as do most cartridges, 
and will not interfere with BASIC pro- 
grams. A slide switch on the Keeper al- 
lows it to be totally switched out from 
the computer's view, and helps save 
wear and tear on the expansion port. 
The slide switch can also select the 
RAM or ROM modes, In RAM mode 
position, the Keeper’s memory can easi- 
ly be changed, and is treated like typical 
random access computer memory. In 
the ROM position, the Keeper's memo- 
ry is read-only, and can’t be changed 
even if you turn the computer off. The 
Keeper's secret is that it contains a bat- 
tery that preserves its memory after you 
turn off the computer. 

The Keeper comes with an easy-to- 
use menu-driven program that’s writ- 
ten in BASIC. This program guides you 
through the operation of the Keeper 
and controls the storing of program 
information to cartridge. There is also a 
special KEEP command which may be 
used to store programs in Keeper's 
memory in lieu of using the menu pro- 
gram. This command allows the Keeper 
cartridge to perform like an instant disk 
drive. 

One: of the most interesting capa- 
bilities of this cartridge is its autostart 
ability. With it, any program stored in 
the Keeper will run when the computer 
is powered up. I’ve used the Keeper to 
store many programs, including the 
DOS Wedge, a machine language mon- 
itor, SpeedScript, various utilities, and 
my own programs. 

In a search of similar hardware on 
the market, I noticed a couple of 
EPROM (Erasable Programmable Read 











Only Memory) systems—but these lack 
the flexibility and convenience of the 
Keeper. For an equivalent EPROM sys- 
tem you’d need an EPROM chip, an 
EPROM programmer, an EPROM eras- 
er, and a housing cartridge to plug the 
chip into the computer. The combined 
cost of these items would be much 
greater than the cost of the self- 
contained Keeper. If you like the idea of 
an autostart cartridge that you can pro- 
gram yourself and that has the features 
described here, you'll like the Keeper. 

—Marvin Green 


Marovco Electronics 

15702 S, Neibur Rd. 

Oregon City, OR 97045 

$39.95 (plus $3 shipping and handling) 





COMPUTE!'s Gazette is 
looking for utilities, 
games, applications 
educational programs, 
and tutorial articles. If 
you've created a pro- 
gram that you think 
other readers might en- 
joy or find useful, send 
it, on tape or disk to: 


Submissions Reviewer 
COMPUTE! Publications 
P.O. Box 5406 
Greensboro, NC 27403 


Please enclose an SASE 
if you wish to have the 
materials returned. 
Articles are reviewed 
within four weeks of 
submission, 
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Answer: 1040ST“ 


Question: Which computer was 
specially designed for people 
who hate to wait? 


Let's face it, any time you spend waiting on a computer is 
time wasted. That's why Atari” built the 1040ST with a sizzling 
clock speed of 8 MHz. 

And with 1024K bytes of Random Access Memory, the ST™ 
gives you an incredible combination of power and speed. (The 
PC AT)" for example, has 512K of memory.) 

So you'll spend time working on your ST, instead of 
waiting on it. = 

In addition, the 1040ST costs an 
amazingly low $999”, which makes it the 
first computer in the world to deliver 
1 Megabyte of memory for under $1,000. 
(The PC AT costs about $4,500.) 

So if you haven't checked 
out the ST yet, what are you 
waiting for? 

ATARI, ST, and 104057 aro trademarks of Atari Corp 
AT isa trademark of International Business 


Machines, Inc: 
©1986 Atari Corp, 















What does the 
Bible say? And 


where? 


We offer an integrated family of software products that allow you to search the Bible as 
never before. 

With “THE WORD Processor” software (which includes the complete text of the KJV 
or NIV Bible) you can create indexes on key words, phrases, even concepts, as well as 
search, display or print, for just $199.95. Greek and Hebrew Transliterator products 
which include Strong’s Concordance are also available. Or choose from a host of other 
exciting Biblical software products available in varying price ranges. 

So if you're still searching, give us a 7 
call. We're anxious to show you how 
your PC can help you access your 
Bible as never before. 


Include $3.00 for postage and handling. For Apple, ISM PC, 
Commodore 64, TRS8O, Kaypto, CPM 2.2, MS-DOS, 


ESEARCH SYSTEMS 


2013 Wells Branch Parkway, Suite 304 
Austin, Texas 78728 (612) 251-7541 
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Gemini II Printer 


Star Micronics made a name for itself a 
few years ago with Commodore 64 
owners when it introduced the Gemini 
10X printer. The 10X, based on price 
and performance, went on to become 
one of the most popular printer choices 
for Commodore owners. 

At the recent Summer Consumer 
Electronics Show, Star Micronics pre- 
miered the Gemini II, a Commodore- 
specific dot-matrix printer that 
combines the most popular features of 
the earlier model with many ease-of- 
use features found on more expensive 
business printers. With this new addi- 
tion to its product line, Star has mir- 
rored the industry’s move toward 
producing both hardware and software 
that can be operated easily by new 
computer owners. Of particular note 
are the Gemini II’s paper-handling, 
switch-selectable modes, and quality 
and variety of type styles, 

As with most other printers that 
come with cables designed for a specific 
computer, setup is simple and fast. You 
just plug one end of the specially de- 
signed Commodore serial cable into the 
printer and the other end into the back 
of the disk drive. The printer cover and 
paper holder snap easily into place, and 
are just as easily removed when you 
want to change from continuous paper 
feed to single sheet feed. 

You can’t really appreciate a print- 
er with a slick, well-designed paper 
feed system unless you've used a poor- 
ly designed one. Even if you plan to use 
your printer only for printing out pro- 
gram listings or rough copies of corre- 
spondence, a reliable tractor feed that 
won't lose its grip on the paper every 
third or fourth sheet or get stuck and re- 
fuse to feed the paper to the next line is 
essential. The real challenge comes for 
the user who needs to switch frequently 
between continuous form-feed paper 
and single sheets or stationery. The 
Gemini II handles this operation admi- 
rably. You set up the snap-on paper 
holder that separates the incoming and 
outgoing streams of form-feed paper at 
about a 75-degree angle, rest your piece 
of paper against it, move the paper- 
control lever, and your paper is auto- 
matically fed around the platen and 
into position, Switching back to form- 
feed operation requires you to move the 
tractors back into the right position and 
refeed the paper into the tractors, The 
process may seem a bit clunky and 
time-consuming at first—having to 
keep moving the tractors and paper 
separator—but it’s reliable. I 

A second area in which the Gemini 
Il excels is mode selection. Not only can 
you easily switch back and forth be- 
tween draft mode and NLQ (Near Let- 
ter Quality) mode by pressing buttons 
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this is a samPle of text Printed by the Gemini Il at 80 cpl. 
This is a sample of text Printed by the Gemini [1 at 96 cpl. 
This 18 a sanPle of text Printed by the Geaini [I at 136 cA, 


This is a sample of text pcinted by the Gemini II in NLO mode. 





on the front panel, but you can also 
choose among three different pitches 
(characters per line) within draft mode 


in the same way: 80 characters per line 
(pica), 96 cpl (elite), and 136 cpl (con- 
densed). Turning boldface on and off is 

















Software 


14840 Build 
America Dr., 
Woodbridge, = 
VA 22191 

Info: (703) 491-6494 


800 762 5645 











accomplished the same way. You sim- 
ply press a button on the control panel. 
It’s unusual to see a printer for the home 
market in this price range that offers 
pushbutton control of functions that are 
often controlled only through software 
or by adjusting the DIP switches. 

The Gemini II is Commodore 
1525-compatible with some extra fea- 
tures so that things like underlining, 
italics, superscript, and subscript are 
controllable through software. For the 
novice who has never worked with 
printer formatting commands, the ac- 
companying documentation offers 
clear, thorough instructions on how to 
work with different type variations. 

As far as the noise level and speed 
of the Gemini II go, they’re both about 
average for a printer in this price range. 
Though the noise is muffled somewhat 
by the printer cover, long printing jobs 
may be a bit disturbing to anyone with- 
in earshot, But that’s a problem with 
any impact printer; when a metal object 
is striking something else with the reg- 
ularity of a printer, there’s bound to be 
some noise, The Gemini II runs at 120 
cps (characters per second) in draft 
mode and 30 in NLQ mode. That can 
seem pretty slow sometimes when you 
have several printing jobs in a row, but 
it’s the norm for printers in this general 
price range. 

A manufacturer's reputation for 
quality products is extremely important 
to consider when you're shopping for a 
printer, Star Micronics has a good 
name, Should you have technical diffi- 
culty in setting up or operating your 
printer (like disk drive lockup when the 
printer is on), remember that the Com- 
modore 64 has gone through several 
ROM changes in its four-year life. Op- 
erational problems may be the fault of 
your computer or disk drive, not the 
printer itself. Should something come 
up that you think is a problem with the 
printer, Star operates a toll-free techni- 
cal assistance line—(800) 367-3119. 

—Kathy Yakal 
Star Micronics 
200 Park Ave., Suite 3510 
New York, NY 10166 
$329 (includes Commodore interface) 





Answer: 1040ST™ 


of hidden costs? 


you add, 


Of course, the ST’s best 
incredible $999"! 


© 1986 Atani Corp. 


built-in is the price, which is an 


ATARI, ST, and 1040ST are trademarks of Atari Corp, 


Question: Which computer builds 
in multiple features instead 


It seems that a lot of our competitors design stripped down 
computers, and then charge extra for every feature and upgrade 


Atari® doesn’t do that, because we believe the features and 
level of performance you want should be built in to begin with. 

That's why the 1040ST gives you a full Megabyte of memory. 
While the competition only gives you the chance to spend big 
dollars trying to improve their memories. 

Another trick they use is to make sure 
their interfaces don’t meet industry stan- 
dards, so you're locked into their system. 
In contrast, the ST™ uses standard inter- 
faces across the board,suchas the RS-232 
port for serial modem communica- 
tions and the parallel interface for 
an industry standard printer. 
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BACKUP PROTECTED 
SOFTWARE FAST. 


From the team who brought you 


COPY II PLUS (apple), ‘opy Il PC 

(IBM) and COPY II MAC (Macin- 

tosh) comes a revolutionary new 

copy program for the Commodore 

64 and 128 computers. 

* Copies many protected 
programs—automatically. (We 
update Copy II 64/128 regularly to 
handle new protections; you as a 
registered owner may update at 
any time for $15 plus $3 s/h.) 

* Copies even protected disks in 
under 2 minutes (single drive). 

* Copies even protected disks in 
under 1 minute (dual drive). 

© Maximum of four disk swaps on 
asingle drive. 








Backup utilities also available for the IBM, Apple II, Macintosh and Atari ST. 
This product is provided for the purpose of enabling you to make archival copies only. 





* Includes fast loader, 12-second 
format. 

Requires a Commodore 64 or 128 

computer with one or two 1541 or 

1571 drives. 

Call 503/244-5782, M—F, 8—5 

(West Coast time) with your 2 Gm 

in hand, Or send a check 

for $39.95 U.S. plus $3 s/h, $8 

overseas. 


$39.95 


Central Point Software, Inc. 
9700 S.W. Capitol Hwy. #100 
Portland, OR 97219 


Central Pomt 
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ESCaping With 
The Commodore 128 


The Commodore 128 offers a vari- 
ety of editing and screen control 
features which are accessed using 
the ESC (escape) key, located on 
the far left of the upper row of gray 
keys. These features—new to Com- 
modore machines—make Commo- 
dore’s popular full-screen editing 
even better. 

Each of the 27 features is ac- 
cessed by first pressing the ESC 
key, releasing it, and then pressing 
another key—either a letter from A 
through Z or the @ (at) symbol. 
Unlike control characters such as 
CONTROL-9 ({RVS}) where you 
hold down one key (CONTROL, 
Commodore, or SHIFT) while 
pressing another, you should not 
hold down the ESC key. You press 
the ESC key once and then press 
the other key. The two keystrokes 
together form an escape sequence. 
The escape sequence functions can 
also be used within programs by 
printing the character code for ESC 
(CHR$(27)), followed by the appro- 
priate letter for the sequence you 
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Jim Vaughan 


The ESC key makes the Commodore 128 an even 
more powerful machine. With it, 27 new screen- 
editing features can be accessed. This article dis- 
cusses each of the ESC key sequences and how to 
use them in your own programs. Two helpful 
demonstration programs are also included. 


wish to use. (It’s purely coinciden- 
tal, but there are 27 new editing se- 
quences for ESC, which is 
CHR$(27)). The sequences function 
identically with shifted and unshift- 
ed letters—ESC SHIFT-A does the 
same thing as ESC A—so the same 
techniques work if SHIFT LOCK or 
CAPS LOCK .is pressed. (The ex- 
ception is ESC @, since ESC 
SHIFT-@ does nothing.) 

The new set of commands can 
be broken down into three catego- 
ries: editing enhancements, screen 
control enhancements, and miscella- 
neous, 


Editing Enhancements 

The new editing commands allow 
quicker movement around the 
screen and easier entry or deletion 
of part or all of a program line. 
These sequences are summarized in 
Table 1. 

The first sequence, ESC A, puts 
you into auto-insert mode. This al- 
lows you to enter text or program 
lines at the current position of the 





cursor without writing over the rest 
of the line, Auto-insert mode is 
most useful when you need to go to 
the middle of a program line and 
add statements. ESC C cancels the 
insert mode. (The Commodore 128 
System Guide that comes with the 
computer erroneously states that 
this sequence cancels quote mode.) 
Once you're finished inserting text, 
it's advisable to cancel the mode 
with ESC C, since printing is notice- 
ably slower when the computer's in 
auto-insert mode. Note that auto- 
insert mode is different from the 
other kind of insert mode which ap- 
pears when you hold down SHIFT 
and press the INST/DEL key. With 
ESC A, you don’t have to open up 
the space first; also, auto-insert 
mode doesn’t act like quote mode. 
Control characters such as RVS ON 
won't print in reverse video as they 
do in quote mode or insert mode. 

ESC D allows you to delete the 
program line the cursor is currently 
on. (To delete just part of a line, see 
ESC P and ESC Q below.) Be 
warned, however, that if the pro- 
gram line extends over more than 
one physical screen line, this will 
delete the entire logical line—not 
just the single screen row the cursor 
1s on, 

ESC I allows you to insert a 
blank line at the current cursor po- 
sition. This sequence will move 
down one row all text on and below 








the line containing the cursor. Any- 
thing on the bottom row will be 
scrolled off the screen, and the cur- 
sor will remain on the new blank 
line. If you insert a line in the mid- 
dle of a multirow program line, the 
text on the rows following the new 
line will still be considered part of 
the program line. Remember to put 
the cursor on the screen row where 
you want the new line to be added 
before you issue this sequence. 
ESC J and ESC K allow quick 
movement on the program line the 
cursor is on, ESC J moves the cursor 
to the beginning of the program 
line, and ESC K moves the cursor to 


the position just beyond the last | 


nonspace character in the program 
line. (Again, these commands work 
with logical program lines, which 
may consist of more than one phys- 
ical screen row.) I find these se- 
quences the most useful when 
editing, since I’m always adding 
statements onto the end of program 
lines. Using ESC K saves me from 
having to hold down the cursor- 
right key and wait until the cursor 
reaches the end of the line. 

ESC O cancels quote mode. 
Probably every Commodore pro- 


grammer has tried editing a portion | 


of a program line between quota- 
tion marks and ended up with a col- 
lection of reversed characters. The 
operating system treats editing 
characters like {DOWN} and 
{RVS} differently when they are 
typed within quotation marks. In- 
stead of acting immediately, they 
appear as reverse characters. This is 
fine if you’re trying to create a 
string to print cursor-right charac- 
ters, but annoying if you want to 
use the cursor-right key to move to 
the end of the string. By using ESC 
O, you can cancel quote mode to 
use the normal editing keys with- 
out getting the reverse characters. 
Insert mode (which is almost iden- 
tical to quote mode) is in effect 
when you insert spaces with the 
INST/DEL key. For example, if you 
insert five spaces, those five charac- 
ter positions behave as if they were 
within quotes. ESC O cancels this 
effect as well. It’s not documented 
in the manual, but pressing ESC 
twice in a row (ESC ESC) is the 
same as ESC O—a handy shortcut. 
(ESC O is erroneously defined in 
the System Guide as cancelling auto- 
insert mode. The manual has ESC 








Table 1: Editing Enhancements 


ESCA _ Enable auto-insert mode 

ESCC Cancel auto-insert mode 

ESCD Delete the current logical line 

ESC I Insert a blank line , 
ESC J Move to the beginning of the current line 
ESC K Move to the end of the current line 
ESCO Cancel quote mode (ESC ESC also works) 
ESC P Erase from beginning of line to cursor 
ESCQ Erase from cursor to end of line 

ESC @ Erase from cursor to end of screen 


Table 2: Screen Control Enhancements 


ESC B Set bottom right corner of Oufput, window 
ESCL Allow scrolling 

ESCM Disable scrolling 

ESCT Set top left corner of output window 

ESC V Scroll screen up one line 

ESC W Scroll screen down one line 

ESC X Switch between 40- and 80-column modes 
Table 3: Miscellaneous Sequences 

ESCE Set cursor to nonblinking mode 

ESCF Set cursor to flashing mode 

ESC G_ Turn on (enable) bell tone 

ESCH Turn off (disable) bell tone 

ESCN Return to normal 80-column display 
ESCR Reverse 80-column character and ese! colors 
ESCS Change 80-column cursor to block 

ESC U Change 80-column cursor to underline 
ESC Y Restore default tab stops ty 
ESCZ 


Clear all tab stops 





C and ESC O functions reversed.) 

ESC P will erase everything 
from the beginning of a program 
line to the position of the cursor. 
That means if you put the cursor in 
the middle of a program line and 
then press ESC P, the first half of 
your line, including the line num- 
ber, will be erased. ESC Q is the 
complement of ESC P, meaning 
that it will erase everything from 
the cursor to the end of the line. 
Erased positions are filled with 
spaces; the cursor and remaining 
text do not move. As before, it’s im- 
portant to remember that these se- 
quences affect logical lines, not just 
screen rows. If you press ESC P 
when the cursor is in the middle of 
the third row of a program line that 
spans four screen rows, 2-1/2 rows 
will be erased—not just the row on 
which the cursor resides. 

ESC @ is an enhanced version 
of ESC Q. Instead of erasing to the 
end of the current line, it erases ev- 
erything from the cursor position to 
the bottom right corner of the cur- 
rent output window. This can be 





useful when you're loading a pro- 
gram from the directory. Press f3 to 
list the disk directory, move the cur- 
sor to the program you want to 
load, and type DLOAD (or RUN) to 
the left of the filename. Now press 
TAB two or three times, until the 
cursor is past the name of the pro- 
gram. Finally, type ESC @ to clear 
the bottom portion of the screen 
and press RETURN to load the 
program. 


Screen Enhancements 

The following group of sequences 
manipulate the entire screen area as 
opposed to just editing lines. These 
sequences are summarized in Table 
2. It’s not really proper to refer to 
the screen when talking about the 
128’s display, since all screen oper- 
ations actually depend on the 
height and width of the currently 
defined output window. It’s easy to 
forget this; the output window is 
most often set to cover the entire 
screen, but that doesn’t have to be 
the case. The 128’s windowing ca- 
pabilities aren’t as powerful as 
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those of a Macintosh or Amiga— 
you have only one window to work 
with—but they do allow you great 
flexibility in designing screen 
displays, 

ESC B and ESC T can be used 
to change the boundaries of the 
output window, ESC T defines the 
current cursor position as the top 
left corner of the window—the 
home position of the output dis- 
play, where the cursor will go when 
the CLR/HOME key is pressed. 
ESC B defines the current cursor 
position as the bottom right corner 
of the window. Just move the cur- 
sor to the desired position and use 
the sequence to set the new bound- 
ary. You probably wouldn’t use 
these escape sequences in a pro- 
gram (although you could) because 
the WINDOW command is more 
convenient to use. 


There are a lot of creative ways 
to employ windows when you're 
programming, For example, you 
may decide you want to look at a 
disk directory. Just create a window 
and press £3, Whatever is outside 
the window will remain un- 
changed. You could also compare 
two sections of a program by listing 
the first part, setting up a window, 
and listing the second part. (See 
“Windows on the 128," COMPUTE!’s 
GAZETTE, April 1986, for more 
about windows.) 

The window isn’t cleared 
when it is resized, but all lines are 
unlinked (the text in each row is 
“disconnected” from that in any 
previous or following rows). The 
sequences are easy to remember: 
ESC T for Top and ESC B for Bot- 
tom. Pressing CLR/HOME twice in 
a row (HOME HOME) will reset the 
window to full screen size. 

ESC M and ESC L control how 
text is handled when there’s no 
more room at the bottom of the 
window, Normally, all lines of text 
in the window scroll upwards to 
add the text to a new line at the bot- 
tom of the window (the previous 
top line is scrolled off the screen). 
ESC M turns off the scrolling, 
When scrolling is disabled and the 
screen is full, the next PRINT state- 
ment will cause the text to be dis- 
played at the top of the screen, 
unless the PRINT statement is fol- 
lowed by a semicolon (;). When you 
LIST a program or directory which 
is longer than the current height of 
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the window, printing automatically 
jumps back to the top of the win- 
dow after a line is displayed at the 
bottom. However, things get a bit 
strange when the PRINT statement 
ends with a semicolon. Press ESC 
M; then try the following line: 
FOR I=1 TO 5000: PRINT 
CHRS(INT(RND(1)*64+32));: NEXT 

When the bottom line of the 
window fills up, the printing will 
continue in the position at the low- 
er right corner of the screen, with 
each successive PRINT overwriting 
the previous character in that posi- 
tion. This mode is useful when 
you’re trying to display some 
graphics effects that you don’t want 
to scroll off the screen, but you 
must plan your PRINT statements 
carefully when scrolling is disabled. 
Use ESC L to turn the normal 
scrolling feature back on, 

ESC V and ESC W move all 
lines of text in the window up (ESC 
V) or down (ESC W) one row, add- 
ing a new blank line at the bottom 
or top of the screen, Any text that is 
scrolled off the top or bottom of the 
window will be lost—it’s not recov- 
ered when the window is scrolled 
back in the opposite direction, 
Scrolling down is an interesting ef- 
fect which could be exploited in an 
auto-racing game. You'd put the 
cursor on the top line, print the two 
edges of the road, scroll it down, 
and repeat. It would be relatively 
easy to add a sprite for the automo- 
bile, a joystick movement routine, 
and a routine that subtracts points 
when the car hits the side of the 
road (using the COLLISION 
command). 

The 128 provides both 40- and 
80-column displays, but only one 
can be active at any given time. 
That is, only one display can have a 
“ive” cursor, and all printing will 
be sent to that display. The ESC X 
sequence allows you to switch be- 
tween the two display modes. This 
sequence is a toggle: Whenever you 
use ESC X, the display that is cur- 
rently active becomes inactive and 
the one which was previously inac- 
tive becomes the active display. 
This sequence doesn’t actually turn 
either video chip on or off—what- 
ever is currently displayed on the 
screen which becomes inactive will 
remain intact until the screen be- 
comes active again (or until the re- 
set button or RUN/STOP- 





RESTORE is pressed). If you are 
using the same monitor for both 
displays, you still must switch the 
monitor to the desired display. The 
40/80 DISPLAY key has no effect 
on ESC X (other than to determine 
which display will be active after 
reset or RUN/STOP-RESTORE). 


Miscellaneous Sequences 

This last set of sequences is called 
the miscellaneous group simply be- 
cause they don’t fall into either of 
the above two groups. These se- 
quences are summarized in Table 3. 

The 128 allows you to custom- 
ize the cursor to your own tastes. 
Some people find the blinking cur- 
sor irritating, so ESC E stops cursor 
flashing. The cursor remains visi- 
ble—it’s now a nonblinking block. 
ESC F will make it flash again. 
Those who use the 80-column 
screen have an additional choice. 
ESC U changes the 80-column dis- 
play’s cursor from a character-size 
block into a character-width under- 
line (the 40-column cursor is unaf- 
fected), ESC E and ESC F can still 
be used to make the underline cur- 
sor nonblinking or flashing, respec- 
tively. ESC S changes the cursor 
back to a block. 

The 128 has a feature that is 
common on most other computers 
and terminals, but which had been 
missing on the VIC-20 and Com- 
modore 64: a BELL character. Print- 
ing CHR$(7)—or holding down the 
CONTROL key and pressing G— 
causes a bell-like tone if your moni- 
tor is equipped with a speaker. This 
is a handy way to generate an 
attention-getting sound, but some 
programs may make excessive use 
of the feature. Maybe you just find 
the noise annoying. Whatever your 
reason for using it, ESC H disables 
the tone. Use ESC G to turn it back 
on, 

The background color of the 
display is normally determined by 
the value in a video chip register, 
and the color of each character is 
normally determined independent- 
ly by the value in a color memory 
location corresponding to the char- 
acter’s position on the display. On 
the 80-column display, this can be 
reversed. After you issue the ESC R 
sequence, all characters take what 
was previously the background 
color, and the background for each 
character is determined by the color 








value in the corresponding color 
memory position. (The 40-column 
display is unaffected.) Use ESC N 
to return the display to normal. 
ESC R is useful when you have the 
80-column output displayed on a 
monochrome monitor and want 
dark characters on a light back- 
ground, 

The two final sequences deal 
with tab stop settings. Whenever 
you press the TAB key (located next 
to the ESC key on the upper row of 
keys) or print the tab character 
(CHR§(9)), the cursor moves to the 
next column for which a tab stop 
has been set or—if there are no 
more tab stops—to the right 
boundary of the output window. 
This is useful for aligning columns 
of text and numbers. When the 128 
is turned on or reset, it establishes a 
tab stop every eight spaces. ESC Z 
erases all tab stops so the cursor al- 
ways goes to the right margin of the 
window when you press TAB, You 
can change the tab stop setting of 
the column where the cursor cur- 
rently resides by pressing SHIFT- 
TAB (or CONTROL-TAB). This is a 
toggle: If no tab stop has been pre- 
viously set at the column, one will 
be set there when you press SHIFT- 
TAB or CONTROL-TAB, However, 
if a tab stop was already set for the 
column, it will be cleared. You can 
get the same effect within a pro- 
gram by printing CHR$(24). ESC Y 
resets the default tab stops (one ev- 
ery eight spaces). Changing tab set- 
tings—including using ESC Y and 
ESC Z—affects only the active dis- 
play. Each display has its own tab 
stop table, so it’s perfectly possible 
to have default tab settings for the 
80-column display while having 
tab stops every four spaces, or no 
tab stops at all, for the 40-column 
display. 


Using The Sequences From 
Within A Program 

As noted earlier, even though these 
new ESC sequences are useful for 
program editing and for onscreen 
fun, they can also be used within a 
BASIC or machine language pro- 
gram to achieve the same results. 
Some of the sequences may not 
have an obvious effect while the 
program is running. For example, 
since the cursor is turned off when a 
program is running, changing the 
cursor mode won't have any imme- 





diately visible effect except in IN- 
PUT commands. Program 1 is a 
short demonstration of how a few 
of these ESC codes can be used ina 
BASIC program. Type in the pro- 
gram carefully, since it contains a 
lot of cursor control codes inside 
quotation marks. To use these se- 
quences in a machine language pro- 
gram, print the ESC code ($1B) 
using the BSOUT routine ($FFD2); 
then print the ASCII code for the 


. desired function, For example, the 


following code would scroll the dis- 
play up one line: 

LDA #$1B 

JSR $FFD2 

LDA #$56 

JSR $FFD2 

A handy way to use these se- 
quences is to include them in pro- 
grammable function key definitions. 
You can use the line 
KEY 1, CHRS(27)+“1" 
and a blank line of text will be in- 
serted whenever you press fl. If 
you want to have the editing defini- 
tions loaded automatically when- 
ever the computer is turned on or 
reset, you can write a key definition 
and make it an autobooting disk 
file. Program 2 was written for just 
that purpose. It assigns an editing 
function to each of the eight func- 
tion keys and prints a menu at the 
bottom of the display for easy refer- 
ence, The output window is then 
reduced by two lines so that the 
menu won’t be overwritten. To 
make the progam autobooting, use 
the “Autoboot Maker” program on 
the 1571 Test/Demo disk that came 
with your drive, or use a program 
like ‘128 Autoboot’’ (COMPUTE's 
GAZETTE, March 1986). 

The key definitions included in 
Program 2 may not be the ones that 
you wish to use most often, but it’s 
easy to change any of the defini- 
tions to ones that suit you. The defi- 
nitions currently included in 
Program 2 are as follows: 
fl Enable auto-insert mode 
f2 Cancel auto-insert mode 
£3 Insert a blank line 
f4 Delete a program line 
f5 Move cursor to start of line 
{6 Move cursor to end of line 
{7 Delete to start of line 
f8 Delete to end of line 

Once you start to learn the ESC 
sequences, you ‘Il find yourself 
using them more and more 
frequently. 

See program listings on page 117, @ 
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Menu System 


“Menu System” asks a series of 
questions and then goes to work for 
you. And it’s very easy to use. 

You begin by entering infor- 
mation about files on your disk. 
Menu System then writes a custom 
directory menu. This menu remem- 
bers and executes the proper load 
extension (,8 or ,8,1), and it remem- 
bers the SYS number or the RUN 
command if needed, If programs 
are added or removed from the disk 
ata later date, the customized 
menu can be loaded back into 
Menu System to be edited. 


Making A Menu 

Menu System is written entirely in 
BASIC. It works as listed for the 
Commodore 64. If you have a 
Plus/4, add lines 1 and 5 and sub- 
stitute lines 190, 620, and 630 as 
shown below: 


KE 1 COLOR 0,7,4:COLOR 4,7,4 
RC 5 KEY1,CHR$(133) :KEY2,CHRS$( 

137) :KEY3 ,CHRS (134) :KEY4, 

CHR$ (138) :KEY5, CHRS(135) 
XB 196 S8$="70 FORZ=OTOX:B=131 
9+2:POKEB, 13 :POKE239, 2: 
NEXT: PRINT"+CHRS (34) +" 
{HOME }" 
PRINT"SAVE"+CHRS (34)+"@ 
@ :MENU"+CHRS (34)+",8:SY 
S65526 {HOME} " 
FORZ=0TO10 : POKE1319+Z,1 
3 :POKE239,Z+1 :NEXT 


HB 620 


GP 638 


After typing it in, be sure to 
save a copy. To use the program, 
load it and type RUN. The main 
menu will appear, and you'll see a 
list of five available functions. To 
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Don J. Reynolds 


With this useful program, you can easily create 
your own disk directory menus with descriptive 
filenames. Once you've created the custom menu, 
all it takes is one keypress to load and run a 
BASIC or machine language program. For the 
Commodore 64 and Plus/4. 


create a new menu, press f1. The 
editing screen is displayed, with 20 
blank program slots. Follow the 
prompts on the screen: 


1. Type E to edit. 

2. Enter the slot number you want 
to edit. 

3. Enter the program name as it 
should appear on the custom 
menu. 

4. Enter the boot name, the actual 
name of the file in the directory. 

5. Enter the load extension: 

a) 0 to load ,8( BASIC 
programs) 

b) 1 to load ,8,1 (machine 
language programs) 

6. Enter the SYS number or press 
RETURN. 

7. Enter Y if a RUN command is 
needed, N if it is not. 


Continue entering data until 
you've covered all programs on the 
disk, up to a maximum of 20 pro- 
grams. Then press RETURN to dis- 
play the main menu again. Press f4 
to save the menu file to disk. You'll 
be prompted to insert the disk. A 
sequential file named “’.M’’ that 
contains all the information for 
your custom menu will then be 
saved to your disk. 

To verify that the file was 
saved correctly, press f1. This 
erases the file in memory and dis- 
plays the editing screen again. 
Press RETURN to get to the main 





menu. Press 2 to load the menu file 
from disk, At this point you can edit 
the menu and resave it, or erase it to 
create more menus, 

The last step is to write the 
menu driver program MENU to 
disk by pressing f5. The program 
driver will be written to your disk 
and a cold start will take you back 
to BASIC. The dynamic keyboard 
technique (lines 600-630) is used to 
generate the MENU file, and Menu 
System is erased from memory in 
the process. If you delete the SYS 
64738 (64 version) or SYS 65526 
(Plus/4 version) in line 620, the 
program will end with the menu 
program in memory. You can then 
run it or save it to other disks. 

The MENU file is identical on 
all disks. It reads in the file .M, 
which is unique to each disk. You 
must always edit and save .M with 
the Menu System program. Once 
you've generated a copy of MENU, 
it can be copied to the other disks 
by any conventional means. 


Using Your New Menu 

Type LOAD “MENU”,8 and then 
type RUN. The program displays 
your custom menu on the screen, 
Enter the number corresponding to 
the program you want to load. The 
program loads and automatically 
executes any other commands you 
have requested, such as SYS 49152 
or RUN. 

Editor’s Note: While you are 
using this program, we suggest hav- 
ing a printout of your disk directory 
on hand for entering information. Or 
you can view your directory—with 
Menu System in memory—using 
“MetaBASIC” or with the “Wedge” 
program on the disk that came with 
your drive. 

See program listing on page 111. @ 
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Kevin Mykytyn and Mark Tuttle 


Have you ever looked at a cryptic filename like 
“ZYM/414/LUB” and wondered what it was and 
where it came from? Have you ever forgotten the 
SYS for a favorite program? This program will 
help; it adds up to 55 characters per directory en- 
try—plenty of room for descriptions and infor- 





mation. For the Commodore 64. 


Commodore disk drives limit file- 
names to 16 characters, which 
sometimes just isn’t enough. ““Di- 
rectory Extension” allows you to 
add a 55-character extension to any 
or all files on a disk. After creating 
the descriptions, simply save them 
on the disk they describe. Then, 
whenever you want to see the de- 
scriptions, load and run Directory 
Extension. Also, you can update or 
modify this file as often as you like. 


Easy Operation 

Directory Extension is written en- 
tirely in BASIC. Type it in and save 
a copy. To use it, type RUN. The 
program first looks for the descrip- 
tion file for the disk in the drive. If 
one exists, it’s loaded into memory. 
Next, the directory of the disk is 





read and you're presented with a 
menu. 

The menu offers five options. 
Option 1 allows you to view the di- 
rectory and enter or edit the de- 
scriptions. To the left is the file 
number. In inverse black is the file- 
name, and the inverse white area is 
the place where you enter the de- 
scriptions. At the bottom of each 
screen are five additional options, 
each chosen when you press the 
appropriate function key. If the disk 
contains more than six files, use the 
{5 and f7 keys to page forward and 
backward, respectively. The f3 key 
allows you to edit the descriptions. 

After pressing £3 to select a file, 
enter the file number. The cursor 
moves to the beginning of the white 
field next to the file you have cho- 





P 


Sp 







sen. (If you mistakenly choose the 
wrong file, press RETURN and all 
will remain intact.) Now you may 
type up to 55 characters. Any char- 
acter is allowed except quotation 
marks, The cursor automatically 
wraps around at the end of a line. 
Use the INST/DEL key to erase. 
When you have finished the de- 
scription or entered the maximum 
number of characters, press RE- 
TURN. You can enter and change 
descriptions as many times as you 
like. When you've finished the de- 
scriptions, return to the main menu 
by pressing f1. Choose option 3 and 
the descriptions will be saved on 
the disk with the filename DIR 
FILE. Be sure you have enough 
room on the disk for this file. 
Option 2 allows you to per- 
form various disk functions: 
scratch, rename, initialize, and vali- 
date, Option 3 saves the descrip- 
tions to the disk. If DIR FILE already 
exists on the disk, the program will 
erase the file and replace it with 
what is in memory. Option 4 allows 
you to work with other disks with- 
out having to rerun Directory Exten- 
sion. Option 5 ends the program. 
See program listing on page 120. @ 
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Sequential File 
Converter For 
SpeedScript 


Ron Carnell 


SpeedScript becomes an even more valuable word 
processor with this program that converts sequen- 
tial files into SpeedScript format. It’s written in 
machine language for fast results. For the Com- 


modore 64. 


I've been using the Commodore 64 
version of SpeedScript, in one ver- 
sion or another, since it was origi- 
nally published in the January 1984 
issue of COMPUTE!’s GAZETTE, The 
only drawback I’ve ever found is its 
incompatibility with sequential 
files. (SpeedScript uses program 
files.) 

My database uses sequential 
files, and many downloaded pro- 
grams are in sequential file format. 
And I have a few friends that use 
other word processors that create 
sequential files. In short, there are 
many instances when I'd like to 
load a sequential file into 
SpeedScript. 

Over the years, COMPUTE! and 
COMPUTE!'s GAZETTE have published 
several BASIC programs designed 
to convert sequential files into 
SpeedScript files. And I’ve used 
them, mostly with great success. 
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But BASIC is inherently slow; when 
my database started creating se- 
quential files over 100 blocks long, 
it became obvious that I needed 
something faster. 

“Sequential File Converter’ 
(SFC), the program accompanying 
this article, is the solution. SFC ac- 
complishes the same thing as the 
earlier BASIC conversion pro- 
grams, but at the speed of machine 
language. 

To type in the program, you'll 
need ‘‘MLX,”’ the machine lan- 
guage entry program found else- 
where in this issue. After loading 
and running MLX, answer the start- 
ing and ending address prompts 
with the following: 

Starting address: 0801 
Ending address: 0ADO 

To use SFC, you need only 
load it and type RUN. You'll be 
prompted for the name of the 





source file (the sequential file) and 
for the name you’d like for the new 
SpeedScript file. (Be sure to have the 
correct disk in the drive when you 
enter the destination name.) 

If you load SFC and type LIST, 
you'll find several lines of BASIC. 
With one exception, you should 
never change any of this code. The 
machine language is attached to the 
end of the BASIC program, and 
changing any of the BASIC code 
will almost certainly cause SFC to 
crash. The exception is line 140. In 
this line, SFC is adding “’,s,r’’ to the 
end of your source filename. The s 
tells the disk drive to access a se- 
quential file, and the r indicates that 
it should be read. You can, in this 
instance, change the s to another 
letter without changing the length 
of SFC and therefore without caus- 
ing the machine language to crash. 
You might wish to do this if you 
want to change a file format other 
than sequential into a SpeedScript 
file. For example, a few word pro- 
cessors store their text as USR files. 
By changing that s to a u, you could 
make SFC a USR converter able to 
access USR files. 


See program listing on page 113. @ 
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AMIGA SYSTEM PACKAGE 
Includes: AMIGA 1000 CPU, 512K, Mouse, Two ENTIRE 
3¥2"' Double Sided Drives, Amiga RGB Monitor, s 
Amiga DOS, Basic, Tutorial, Kaleidoscope, and YSTEM 


Voice Synthesis Library. S$ 1 59900 
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System Package a 
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Disk Drive, Magnavox A 5 

RGB/Composite Monitor $7790 CBIS41 Disk Drive, Taxen 220 A Oe 
: Color Monitor $49900 

FI = 
DRIVES MODEMS MONITORS PRINTERS 

cBM1s41 849900 naa eee siden RGB/COLOR EPSON Homewriter 10845990 

CBM1571 $249 | Anchor 6480 (64/128) Taxan 220 composites47g900 | OKIDATA Okimate 10819900 
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GENERIC DS/DD wiFlip'n File Computer Specialties Power Plus. sgqv | Xetec BK 
10 Disk Holder $4199 Amaray Disk Tubs 3' or 5%" sige $999 Micro R & D MJ3! 
SOFTWARE FOR eaii2eF SOFTWARE FOR AMIGA 
ATARISOFT/Commodore ACTIVISION DISCOVERY 
PacMan $492 Benji Space esas $39 | Hacker. 34% = Marauder Back-up $3200 
Centipede. sqee HES Games/Olympics. 39° | Mind Shadow. $3499 INFOCOM 
Defender $400 Professional Software Borrowed Time. #32 Wishbringer 
Dig Dug, ° Fleet Systems II C126/64,..490° COMMODORE Hitchhiker. 
Donkey Kong Fleet Systems Ill C128.......859% | Textcraft $599 — Spolibreaker 
00 a 
Robotron.., 4 Trivia Fever. 19% | Graphicraft $2999) lanotfall 
BRODERBUND Musicratt $7999 ee 
The Print Shop. $2999 PEs sgqee | TLC Logo. s7go0 Witness 
Graphics Library 1,2,3 ea..179 File 32! Amiga Pascai $7990 MEGASOFT 
Bank Street Writer $3400 SPRINGBOARD Lattice “C “$1190 Copier $3400 
Graphics Companion.........8249® The News Room. 32% | Amiga Assembler 37999 AReport 7 sqqoo 
CARDCO Clip Arts........ $19°9 | Lic, 345600 
Freeze Frame. $3209 lip Arts I $2709 Piet MICRO SYSTEMS 
eee ae ELECTRONIC ARTS: 
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Mastering 128 
Sound And Music 


instrument, 


The Commodore 64 offers exten- 
sive music-generating capabilities 
to the patient and interested pro- 
grammer. The built-in Sound Inter- 
face Device (SID chip) has the 
potential for producing sophisticat- 
ed electronic music, with the com- 
puter manipulating the various 
parameters of three independent 
voices simultaneously. Program- 
ming the SID chip is not that easy, 
however; a tedious process of POKE- 
ing values into memory locations is 
necessary to play even a simple 
musical composition. I suspect that 
many a masterpiece has been aban- 
doned at the computer keyboard, 
owing to the frustration of dealing 
with PEEKs and POKEs. 

Enter the 128. With the new 
sound commands available in 
BASIC 7.0, programming the SID 
chip is much less confusing and te- 
dious. Technical understanding of 
memory maps and programming 
details is no longer a prerequisite 
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Part 1 


D. C. Holmes 


As you'll see in this first installment of a series, 
you don’t have to be a musician to create 
professional-sounding music on the Commodore 
128. Several short, useful programs are included— 
this month and throughout the series—to demon- 
strate how just a few BASIC commands can make 
your 128 a powerful and versatile musical 


for composers and arrangers. In 
fact, once the user becomes familiar 
with the PLAY statement, the pains- 
taking chore of translating the 
manuscript into computer language 
is virtually eliminated, You can 
type the score directly into the 
128—straight from the sheet music. 

This series will explore the mu- 
sical capabilities of the Commodore 
128, Each month, we'll discuss dif- 
ferent aspects of BASIC 7.0’s sound 
and music statements. Each article 
will also include programs to illus- 
trate what we've covered. We'll 
start by examining the default pa- 
rameters for the ENVELOPE state- 
ment, and we'll take a detailed look 
at the TEMPO statement. 


Default Envelopes 

Let’s first look at the ten default 
(built-in) envelopes defined in 
BASIC 7.0. These envelopes are 
named after the musical instru- 
ments whose sound they resemble: 





Envelope # Name 

0 piano 
accordion 
calliope 
drum 
flute 
guitar 
harpsichord 
organ 
trumpet 
xylophone 


This month’s first program is a 
short excerpt from Mozart's The 
Magic Flute, I programmed the 
computer to play it over and over 
again, each time using a different 
one of the default envelopes. When 
you run this program, you'll be able 
to compare the different sounds of 
the envelopes. It doesn’t appear 
that Commodore necessarily in- 
tended for these preset envelopes 
to imitate the instruments for which 
they're named. More likely, they 
wanted to provide a sampling of 
the various possibilities, and named 
them to facilitate identification. To 
suggest that envelope 0 really 
sounds like a piano or that enve- 
lope 8 sounds just like a trumpet 
stretches the imagination a bit, but 
some of the envelopes do come rea- 
sonably close to the sound of the in- 
strument they are named after. 

In particular, I thought that en- 
velope 2 sounded a lot like a steam 
calliope, so I selected that envelope 
for the second program this month, 
“American Patrol’’ by F. W. 
Meacham. 


COUNTDOWN Y 





Take a look at line 80 of the 
program: 
80 PLAY “V1T2V2T2V3T2” 


In this line, we've specified 
that all three of the SID chip's 
voices (V1,V2, and V3) will play in 
envelope 2 (T2). Since we've not 
used the ENVELOPE statement to 
redefine envelope 2, the 128 uses 
default envelope #2 (calliope). 

After you've typed this pro- 
gram in and saved it, try specifying 
a different envelope in line 80, To 
use the organ envelope (default en- 
velope 7), you would type: 

80 PLAY “V1T7V2T7V3T7" 


Or you could even get fancy 
and play it with a mixed combo: 
80 PLAY “V1T8V2T4V3TS” 


This statement specifies enve- 
lope 8 for voice 1, envelope 4 for 
voice 2, and envelope 5 for voice 3, 
If you don’t use line 80 at all, the 
128 plays all three voices in the de- 
fault envelope 0. 


The TEMPO Statement 

Composers usually specify_a tempo 
for their works. It may be a general 
(Le 








marking such as “‘Largo,’’“An- 
dante,” or “Allegro,” or it may be 
very specific such as “J = 126,” 
which indicates the exact tempo 
(126 beats per minute in this case). 
The TEMPO statement allows you 
to control the tempo of your musi- 
cal program. The format for this 
statement is 


TEMPO n 

where nis a variable between 1 and 
255. The equivalent musical nota- 
tion is J = 12.49 * n because the 
statement defines the duration of a 
quarter note at 4.805/n seconds, or 
12.49 * n quarter notes per minute. 
Some examples of TEMPO state- 
ments and the corresponding musi- 
cal notations: 


TEMPO # 


4d =50 9 J =12 
5 J -62 10 J = 125 
6 J =75 15 J = 187 
73-87 20 J = 250 
8 J = 100 


If you do not specify a tempo, 
the 128 automatically sets the value 
of n to 8, 


In Program 1, ‘‘The Magic 
Flute,” the TEMPO statement is 
used in line 10: 

10 TEMPO 13 

This defines a tempo of d = 
162. In Program 2, American Pa- 
trol, it’s found in line 20: 

50 TEMPO 20 


This defines a tempo of J = 
250. This might seem to be a very 
rapid tempo, but I’ve arranged this 
piece in 2:2 or cut time, so there are 
actually only 125 beats per minute. 

After you've typed these pro- 
grams in and saved them, try 
changing the value of n in the TEM- 
PO statements to some other num- 
ber between 1 and 255. Then run 
the programs again and listen to the 
effect this change has on the tempo. 

Next month we'll explore the 
programming and synchronization 
of individual voices playing simul- 
taneously (polyphonic sound). And 
we'll learn how to code sheet music 
or your own manuscript arrange- 
ments to play on the 128. 


See program listings on page 114. @ 











GREAT PRODUCTS FOR YOUR COMMODORE 


promenade C1™ 

Thoughtfully designed, 
carefully constructed, the promenade C1™is respected 
around the world for quality and value. The original 
software controlled programmer does away with 
personality modules and switches. Intelligent 
programming capability can cut programming time by 
++ Still just $99.50 


The Eprom Programmer. 


95%! With Disk Software 
CARTRIDGE MATERIALS: 


CPR-3 - Three socket board, case and 3 eproms, for use with CAPTURE™ . . 
PCC2 - Two 2732 (4K) or 2764 (8K) eproms. For '64 or '128 in 64 mode... 
PCC4 - Four sockets for 2764, 27128 or 27256 (32K) eproms. Bank switching 
PCCB - Like the PCC4 but twice the capacity. For multiple programs . 
PRB4 - Four sockets, eprom & battery backed RAM combination .. 
PTM2 - Basic 128 mode cartridge board. Two 2764 or 27128 eproms 
PTM4 - Four sockets, 27128 & 27256 eproms, 128 mode bank switcher 
PCCH2 - Plastic case for above cartridges (except PCC8) 


memory-resident 
accessible to you 


starting cartridge 


CAPTURE™ 


Take control of your '64 or '128* with this easy to use 
cartridge. Lets you make a back-up disk of your 


software. Your program is then fully 
and your program can be re-booted 


from your disk 3-5 times faster. Or make an auto- 


using the promenade C1 and a CPR 


cartridge kit. Its magic! 


CAPTURE" is a bargain at 39.95 


Eproms - Always in stock at competitive prices. 


EPROM ERASERS: 


Datarase - Hobbyist eprom eraser, 2 at a time, 3 to 10 minutes 
PE14 - Industrial quality eraser, 7 to 9 at a time 
Starter Set - CAPTURE™, promenade G1 and one CPR3 kit 


Deluxe Set - CAPTURE™, promenade C1, Datarase and two CPR3 kits .. 


SHIPPING & HANDLING: USA - UPS SURFACE $3.00 






. 29.95 
4.95 
17.95 
29.95 
24,95 
5.95¢ 
19.95+ 
2.25 














tavailable June '86. 
“when in 64 mode. 


34.95 
79.95 
149.95 
.. 199.95 


FOREIGN (AIR MAIL ONLY) $13.00 





JASON-RANHEIM 


TO ORDER TOLL FREE 800-421-7731 


1805 INDUSTRIAL DRIVE 
AUBURN, CA USA 95603 


FROM CALIFORNIA 800-421-7748 


TECHNICAL SUPPORT 916-823-3284 


FROM OUTSIDE USA 916-823-3285 
MC, VISA, AMEX WELCOME 
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POW BASIC 


Kenneth J. Rogerson 


This utility is a boon to programmers: 
It helps you increase the speed of 
BASIC programs by reporting which 
lines are executed most often so that 
your efforts may be concentrated 
where they will be most effective. Al- 
though it’s written in machine lan- 
guage, you don't need to know any 
machine language to use it. Versions 
for the Commodore 64, 128, Plus/4, 
and 16. 


“Line Count” is a program I had 
waited a long time for someone else 
to write. I finally learned enough 
machine language to write it my- 
self, however, and to make it as 
useful and efficient as possible. 
Line Count is a utility that reports 
which lines are executed most often 
in a BASIC program. With this 
information, you can then target in- 
efficient or redundant areas of code 
that slow the program down. 


Typing It In 

Type in the version appropriate for 
your computer: Program 1 for the 
64, Program 2 for the 128, or Pro- 
gram 3 for the Plus/4 and 16. Each 
of the programs has a checksum 
feature in line 20, which will detect 
typing errors in the DATA section. 
It's also recommended that you use 
“The Automatic Proofreader,” 
found elsewhere in this issue, for 
error-free typing. 

After you've finished typing in 
the program, save a copy to disk or 
tape. To use it, load it and type 
RUN. (Plus/4 and 16 users must type 
the following before loading Line 
Count: POKE 44,32: POKE 8192,0: 
NEW.) If it’s been entered correctly, 
it will POKE the machine language 
into memory (locations 49152- 
49663 on the 64, 3072-3517 on the 
128, and 4096-4479 on the Plus/4 
and 16). After Line Count has been 
loaded and run, load the BASIC 
program you want Line Count to 
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check. Before running your pro- 
gram, enter SYS 49155 (64 version), 
SYS 3075 (128 version), or SYS 
4099 (Plus/4 and 16 version) in di- 
rect mode, and press RETURN, 
This activates Line Count. In a mo- 
ment, the READY prompt and cur- 
sor will reappear. Now. run your 
BASIC program. When it’s finished 
running—or if it stops for any rea- 
son—you can then get a report 
from Line Count. To do this, enter 
in direct mode SYS 49152 (64 ver- 
sion), SYS 3072 (128 version), or 
SYS 4096 (Plus/4 and 16 version), 
and press RETURN. Line Count 
will list the line numbers that your 
BASIC program executed, followed 
by a number indicating how many 
times each line was executed. 

As each section of Line Count 
reinitializes itself when activated, 
you can check several programs in 
succession without having to rerun 
Line Count. Simply load and run 
each program to be checked, re- 
membering to activate Line Count 
with the appropriate SYS and to 
generate the report with the other 
SYS listed above. 


Features And Limitations 
Because it adds its own routine to 
the normal functions of BASIC, 
Line Count causes your program to 
run more slowly than normal. Line 
Count cannot keep track of more 
than 896 lines. If your program is 
longer, Line Count will record only 
the first 896 lines. And Line Count 
can count up to 65535. If a line is 
executed more times than that, Line 
Count will stop your program with 
an error message. Also note that 
Line Count may not work with oth- 
er cartridges or utilities. 

Line Count will not work reli- 
ably if either of the SYS commands 
(used to activate or generate a re- 
port) is used within a program. Use 
Line Count’s SYS commands only 
in direct mode. 

It is not important how your 





Line Count 


program is numbered or how many 
commands are on each of your pro- 
gram lines, 

If a program runs without Line 
Count resident, it will run with Line 
Count, unless your BASIC program 
uses any of the following locations: 


64 128 Plus/4 and 
Version Version 16 Version 
49152-53247 3072-3517 4096-8191 
251-254 251-254 251-254 
776-777 776-777 776-777 


If your BASIC program con- 
tains DATA statements, how they 
are counted will depend on where 
they are placed. DATA statements 
at the end of your program, which 
are not referenced by a GOTO or 
GOSUB and are preceded by END 
or STOP, will not be counted, no 
matter how often the DATA is read. 
If your program contains DATA 
statements placed in the normal 
flow of the program and therefore 
scanned by the BASIC interpreter, 
they will be counted once each time 
they are scanned no matter how 
often the DATA is read. 

You may notice strange results 
when a FOR-NEXT loop is split be- 
tween two or more lines, The expla- 
nation is simple. Assume that the 
program below is being checked 
and that there are no other lines in 
the program. Because there are no 
commands on line 100 after the 
FOR-TO portion of the loop, this 
line will be counted once, while 
lines 110 and 120 will be counted 
100 times. This will occur in your 
programs in similar circumstances. 
If there is a command or statement 
on the same line after the FOR-TO 
command, the line will be counted 
the number of times that the loop 
itself is executed—in this case, 100 
times, 

100 FOR X=1 TO 100 
110 REM 
120 NEXT X 


See program listings on page 116. @ 
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We're happy to welcome Larry Cotton 
and his new column, “BASIC For Be- 
ginners,”’ to COMPUTE!’s GAZETTE. 
Larry is an engineer, keyboard musi- 
cian, and avid Commodore computer 
enthusiast. Larry purchased a Com- 
modore 64 in 1982—for $600—and 
has been a GAZETTE reader since the 
first issue in July 1983. He recently 
built his own MIDI interface for the 
64. Several of Larry's programs have 
been published in the GAZETTE, in- 
cluding “Baker’s Dozen,” “‘Zounds!,” 
“Soundpix,” and “Super Synth.” 


Thanks for the welcome. I’m de- 
lighted to be here. Let's for a mo- 
ment go back to June 1982. The 
home computing revolution was 
rapidly gathering momentum, andI 
decided that it was not going to 
pass me by, But how does one catch 
a train that’s running wild and nev- 
er stops? And which train to catch 
anyway? The computer choices in 
my price range were the Apple II, 
the Atari 400 and 800, and the 
Commodore 64. 

I finally decided on the 64— 
primarily because I liked the musi- 
cal capabilities of the machine. 
Software for the 64 at that time con- 
sisted of a Monopoly clone and a 
typing tutor originally written for 
the VIC-20. 

It must have been because of 
the dearth of software that I started 
learning BASIC programming. To- 
day there’s so much software for 
the 64 that it’s more a temptation 
not to learn to program. But don’t 
succumb to that way of thinking. 
Learn to program. It will make you 
think more clearly, make you more 
organized—and probably keep you 
up later at night. 

This column is for those who 
may have recently bought a Com- 
modore computer, or who just want 
to learn BASIC. I'll start from 
scratch and try not to leave you be- 





hind. And I'll assume only that you 
own a 40-column Commodore com- 
puter, a disk drive, and a TV or mon- 
itor—all properly connected and 
working. 


What Is BASIC? 

BASIC is a language which any 
computer with a built-in BASIC in- 
terpreter, or translator, under- 
stands. 

There are several versions of 
BASIC, each with its own peculiari- 
ties. Commodore's version is not 
totally compatible with Atari’s; 
Atari’s is not totally compatible 
with Apple’s. And the Commodore 
128’s version of BASIC is much 
larger than the 64's. 

Simply typing a BASIC com- 
mand on the screen and pressing 
the RETURN key causes something 
to happen. When you do this, the 
computer responds immediately— 
itis in the immediate mode of opera- 
tion, If you precede the BASIC com- 
mands by numbers, called line 
numbers, the computer takes them 
to be part of a program, and puts 
them into its memory. When you 
type RUN, the computer executes 
them in line number order. This is 
called the program mode of opera- 
tion. 

BASIC programming means 
typing. If you touch type, you're 
ahead of the game. But if you're un- 
familiar with the standard key- 
board layout, it may be rather 
tough learning BASIC and how to 
type at the same time. There are a 
lot of good commercial typing tutor 
programs to help you become more 
familiar with the keyboard. But 
even if you decline formal instruc- 
tion, programming itself can hone 
your typing skills. 


Keywords: The Heart 

Of BASIC 

The user’s guide which came with 
your computer is jam-packed with 
information on BASIC program- 





Learning The Language 


ming. If you haven't referred to it 
(except the part on how to hook up 
your computer), you really should, 

The meat of the guide is the sec- 
tion on BASIC keywords: English- 
like codes which the computer un- 
derstands—the vocabulary of this 
language. 

One keyword you've probably 
already used is RUN. Some com- 
mercial programs require that you 
type RUN to start them, When you 
write your own BASIC programs, 
that’s what you'll type to get them 
running, too. 

Another keyword (or com- 
mand) which you may know is 
LIST. LIST usually shows you (on 
screen) a “list” of the BASIC pro- 
grams in your computer. It won't 
show you cartridge programs, or 
any other programs which don’t 
recognize the word LIST. BASIC 
recognizes the commands LIST and 
RUN, but if you type either one 
with the computer’s memory 
“empty” or with a program in an 
unusual area, nothing happens. 

Turn your computer on, If it’s 
already on with a program in it, re- 
move any cartridge you might be 
using, and turn the computer off, 
then on again. This resets its mem- 
ory, making it ready to accept any- 
thing you want to put into it. 

The incessantly flashing block 
you see on the screen is the cursor 
(you'll eventually discover how it 
got its name); you can make it ca- 
reen all around the screen with the 
cursor keys (at the lower right cor- 
ner of your keyboard). It’s a good 
idea to type BASIC commands in a 
screen area which has no other typ- 
ing. Of course, your typing always 
starts wherever the cursor is. 

When you type RUN or LIST 
and press RETURN, you are utiliz- 
ing the computer’s immediate 
mode. Most other BASIC com- 
mands can be entered in the imme- 
diate mode, also. 
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POWER SUPPLY (C-64) 

1541 (Alignment) 

C-64 (Repair) .. 

C-128 (Repair) ...ccccccce ees 

1541 (Repair & Alignment) ..... 

1571 (Alignment) 

1571 (Repair & Align) 

POWER SUPPLY (C-128) 

PARTS C-64 & C-128 ... 

PARTS AND DIAGNOSTICS INCLUDED 

(FREE Return Freight in the USA. 

APO-FPO, C3PO add $10) 


TO SAVE C.O.D, CHARGES - 
SEND UNIT & POWER SUPPLY 
WITH CHECK OR M.O. 
(916) 364-5134 








Second Source Engineering 
2664-B Mercantile Drive 

Rancho Cordova, 

CA 95670 








OVER THE 


HIDDEN POWER! 


Control lights, appliances, heating & cooling 
systems, relays, motors and virtually any 
electrical device, 

Connect to temperature, light, sound, mois- 
ture, fluid level, pressure and vibration sen- 
sors -plus many more. 

Use as an advanced security system. 

Perform automated testing and experimenta- 
tion, 

Use as a sophisticated laboratory data acqui- 
sition system, 

Use for educational purposes. 

Access each port via one statement in BASIC, 
No interface could be easier to use. 

4 8-bit output ports (32 separate output lines) 
48-bit input ports (32 separate input lines). 





Expands to meet your needs: 
ichannel A-D plug-in conversion module: $25. 
8 channel A-D plug-in conversion module: $50. 
BH100 User Manual includes instructions, 
sample programs and diagrams of typical 
hookups. 


ONLY £129! 





82 COMPUTE!'s Gazette October 1986 


Two more keywords which 
your computer will instantly recog- 
nize are PRINT and GOTO, which 
we'll delve into more deeply in fu- 
ture columns. For now, suffice it to 
say that PRINT and GOTO mean 
just what they say—whatever the 
computer ‘‘sees’’ after the word 
PRINT will be printed on your TV 
or monitor screen (not on your 
printer, if you have one). And 
GOTO means “go to” a designated 
program line. 

PRINT and GOTO can each be 
used in immediate mode, but for 
now, let’s see what their effects are 
in a simple BASIC program. You 
can use any line numbers you want 
to, as long as they're in ascending 
order. Most programmmers prefer 
to use line numbers in increments 
of 10, so that if they leave some- 
thing out, it can be added between 
existing line numbers. 

Clear the screen (press SHIFT 
and the CLR/HOME key in the up- 
per right corner of the keyboard) 
and type this program: 

10 PRINT “COME TO BASIC WEL” 
(press RETURN) 

20 GOTO 10 
(press RETURN) 


Note the quotation marks 
around the strange message and the 
lack of space between the letters in 
GOTO. When you press the RE- 
TURN key with the cursor on each 
line, that line is entered in the com- 
puter’s memory. 

Before you type RUN, try to 
predict what this program does. 
Now clear the screen again. The 
program disappears from the 
screen, but is very much alive and 
well in the computer’s memory. 
Type LIST and press the RETURN 
key. Voila. 

Now type RUN and press RE- 
TURN. You should see a never- 
ending column of ‘‘COME TO 
BASIC WEL"s. 

Line 10 tells the computer to 
print the words in quotation marks 
on the screen, Line 20 is then im- 
mediately executed, but it does 
nothing except put the program ina 
repeating loop by sending control 
back to line 10 again. Since the 
screen is not cleared from within 
the program, the words are auto- 
matically printed underneath each 
other. 

How do you stop it? Just press 
the RUN/STOP key on the left side 








of the keyboard. 

If you don’t see a column of 
“COME TO BASIC WEL”s—or if 
you see the words 7?SYNTAX ER- 
ROR in line 10 or 20—LIST the 
program and check your typing 
carefully. The computer is a perfec- 
tionist. When it encounters a com- 
mand it doesn’t recognize, it 
invariably brings the program to a 
screeching halt and prints ?2SYN- 
TAX ERROR (in whatever line the 
error occurred in). 

Commodore computers have 
an excellent built-in screen editor 
which makes correcting program- 
ming errors much easier than on 
some other computers. The easiest 
way is to place the cursor over the 
mistake and type the correction. If 
you're not familiar with other edit- 
ing features, consult your user's 
guide. Be sure to press RETURN 
with the cursor on that line so the 
computer knows you've changed it. 

BASIC provides a way to ar- 
range PRINTed messages in col- 
umns. Immediately after the second 
quotation mark in line 10, type a 
comma, and press RETURN. The 
line should look like this: 

10 PRINT “COME TO BASIC WEL", 


Run the program again. You 
should see two columns if you're 
working with a 40-column 128, 64, 
Plus/4, or 16, On the 80-column 
128, you should see four columns, 

To make sense out of this mes- 
sage, add a semicolon (;) immedi- 
ately after the second set of 
quotation marks in line 10, and 
press RETURN. Run the program 
again. Creative possibilities for 
using the PRINT command should 
be coming to mind right now. 

This is a very elementary exer- 
cise, to be sure. We'll investigate 
many more sophisticated uses of 
the PRINT command next month, 

If you have any questions on 
Commodore BASIC, send them to 
me at the address below. I won’t be 
able to answer personally, but I'll 
save the best for a future column. 
Larry Cotton 
COMPUTE!’s GAZETTE 
P.O. Box 5406 
Greensboro, NC 27403 








Todd Heimarck 
Assistant Editor 


Commodore has sold between five 
and six million 64s, which makes it 
the most popular home computer in 
this country, if not the world. Al- 
though production of the 64 was 
halted once or twice in 1985, con- 
tinued and steady demand for the 
64 forced Commodore to restart 
production of this old favorite. With 
the announcement a few months 
ago of the new 64C, Commodore 
has made a commitment to contin- 
ue supporting the 64, 

Some 64 owners have ex- 
pressed concern about compatibil- 
ity. Is the 64C somehow better than 
the 64? Is there a way to upgrade an 
older 64 to a 64C? 

The two machines are func- 
tionally identical. BASIC is the 
same, PEEKs and POKEs are the 
same, input/output ports are the 
same, and so on. The 64C’s key- 
board looks something like the 
128’s case, but the new look has no 
bearing on software compatibility. 

What else is new? The 64C 
package includes several disks and 
some improved documentation, 
First, there’s the Graphics Environ- 
ment Operating System (GEOS) disk, 
which includes two programs, geo- 
Write, a word processor, and geo- 
Paint, a graphics program. A 
manual of 100+ pages explains 
how to use the programs. A second 
GEOS disk contains various utili- 
ties, including a notepad and calcu- 
lator. (For more about GEOS, see 
the June and August issues of the 
GAZETTE.) 

The flip side of the GEOS disk 
contains the software necessary to 
log onto the telecommunications 
service QuantumLink. In addition, 
you get an access code which al- 
lows you to get into QuantumLink 
and sign up as a member. Of 
course, you'll need a modem before 


horizons 





you can begin to use this service. Fi- 
nally, there’s an educational chil- 
dren’s game, ‘Odell Lake,” which 
illustrates the interaction between 
different species within an aquatic 
ecosystem. 

The new System Guide is much 
better than the User's Guide once in- 
cluded with the 64, The System 
Guide takes an organized approach 
to learning BASIC, with plenty of 
examples, There are also warranty 
cards and a variety of pamphlets. 

The question is, will GEOS 
catch on among owners of the 64C? 
GeoWrite is a pretty good word pro- 
cessor; its primary advantage is that 
it can print multiple fonts: different 
typefaces, different styles (such as 
bold, italics, or underline), and dif- 
ferent sizes. And geoPaint is a pretty 
good drawing utility, suitable for 
making posters or page layouts. 


Software Development 
For GEOS 
Will there be any other programs 
written for the GEOS environment? 
Berkeley Softworks is said to be 
working on several projects. Addi- 
tional typefaces may soon be avail- 
able, and they're adding printer 
drivers for printers not currently 
supported. And there are rumors of 
a geoBASIC, which may come later. 
More importantly, they’ve put 
together a comprehensive Program- 
mer’s Reference Guide, to be pub- 
lished at the end of this year, The 
preliminary photocopied version 
appears to be thorough and com- 
prehensive. It includes full details 
on drawing lines and rectangles, 
creating icons, clipping areas of the 
screen, adding character sets, read- 
ing the mouse and joystick, using 
sprites, accessing files, handling 
strings, displaying dialog boxes, 
and printing screen dumps, as well 
as information on turbo (fast disk) 
routines and math routines. There's 
also a memory map and a list of 








Changing Your Computer's Personality 


equates to use for machine lan- 
guage programming. 

By publishing this information, 
Berkeley Softworks has made it 
possible for programmers and soft- 
ware publishers to begin develop- 
ing new applications for use with 
GEOS. 

Given the memory limitations 
and speed of the 64, GEOS is a good 
implementation of an icon-based 
operating system, similar to what's 
available on the Apple Macintosh, 
Commodore Amiga, and Atari ST. 
You don’t have to buy a 64C to get 
it; if you have a 64, you can obtain 
GEOS for a suggested list price of 
$59.95, 


IBM Compatibility 

For The 128 

If you own a 128 and want a Macin- 
tosh-like operating system, GEOS 
should be available soon, probably 
as a disk, but there’s an intriguing 
possibility that it will be available 
ona chip. The 128 has an empty in- 
ternal ROM socket, which is ad- 
dressed as bank 4. The 32K which 
fits there has plenty of room for 
GEOS. Adding a new operating sys- 
tem would give the 128 a fourth 
personality to complement 64 
mode, 128 mode, and CP/M. 

Although Commodores are 
popular in the home, IBM is still the 
most popular personal computer 
for business. If you have an IBM at 
the office and a 128 at home, you 
might think that the two machines 
are totally incompatible. In one 
sense, they’re not. 

The 1571 disk drive is valuable 
in CP/M mode because it can read 
Osborne, Kaypro, Epson, and IBM 
CP/M-86 disks. If the 1571 can 
read IBM CP/M-86 disks, why 
can’t it read standard IBM MS-DOS 
disks? Well, it can. 

The following program reads a 
specific track and sector from an 
IBM disk. 
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18 
26 


BANK15 :PRINTCHRS (14) 
T=29:S=2:N=1: REM TRACK, 
SECTOR, NUMBER OF SECTO 
RS 
SD=6: REM SD=1 TO READ S 
IDE ONE 
OPEN15,8,15 
PRINT#15, "U4"; 
PRINT#15, "UO" +CHRS ( 640R( 
SD*16)) +CHRS (T) +CHR$(S)+ 
CHR$(N);:SLEEP1 
FORJ=6T0511:P=PEEK (56576 
) :POKE56576,XOR(P,16) :A= 
PEEK( 56332) : POKE3072+3,A 
:NEXT 
PRINT#15, 
SE15 
90 AS="M COO DFF"+CHR$ (13) 
160 FORJ=LTOLEN (A$) :POKE841 
+3 ,ASC(MID$(A$,J,1)) NE 
XT: POKE208, LEN(A$) 
SM 116 MONITOR 





30 


40 
50 
60 


MS 78 


86 "US": SLEEP2 :CLO 


Adjust the variables in lines 20 
and 30 to read other sectors. Line 50 
sends the burst command that tells 
the 1571 to figure out which kind of 
disk it’s got, and line 60 tells it to 
start reading. Lines 90-110 use the 
dynamic keyboard technique to read 
the memory which has been filled 
with the characters from the IBM 
disk. Since the IBM uses true ASCII 
instead of Commodore ASCII, the 
upper- and lowercase letters will be 
switched. 


61% + 


* % FEATURES x x 


Predicted Scores Each Week 
Season Schedule By Week/Team 
Records & Results: 

Scores By Week 

Scores By Team 

Division Standings 





The program isn’t especially 
useful, but it does demonstrate that 
a 128 and 1571 can read an IBM 
disk. 

A company named S.O.G. 
W.A.P. Software has recently an- 
nounced a program that takes this 
idea a step further. Their $29.95 
program, The Big Blue Reader, reads 
IBM disk files, translates them into 
Commodore ASCII, and writes them 
to a Commodore disk. The program 
can also read a Commodore disk 
and write back to the IBM disk in 
true ASCII. This means you could 
take home an IBM word processing 
disk from work and make changes 
or additions to your files on a 128 
and 1571. 

This adds a potential fifth per- 
sonality to your 128, With a 512K 
expander, an 80-column RGB mon- 
itor, and the IBM file translator, the 
128 begins to look something like 
an IBM. It might even be possible to 
create an IBM emulator chip to drop 
into the empty socket. It’s highly 
unlikely that we’ll see complete 
IBM emulation, but it would cer- 
tainly be possible to create a word 
processor, spreadsheet, or database 





that reads and writes files from 
Commodore, CP/M, and IBM disks. 
It would add even more power to 
the 128. 


GEOS 
Berkeley Softworks 
2150 Shattuck Ave, 
Berkeley, CA 94704 
$59.95 


The Big Blue Reader 
S.0.G.W.A.P. Software 
611 Boccaccio Ave. 
Venice, CA 90291 
$29.95 
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A Complete Pro Football 
x Prediction Program For The 
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1986 NFL SEASON 


Accurate vs ‘Spread’ Since 1981 
More Features — More Information In 1986To........ 


BEAT THE SPREAD 


5 495 INCLUDES DISK, DOCUMENTATION 


SHIPPING & HANDLING 
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* Commodore 64 — 128 


* IBM PC, Tandy & Compatibles 
* TRS-80 MIII/IV 
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We Will Furnish Stats By Mail Or Modem 
All 20 Weeks — Season Price . . . 40° 
Program Comes Updated Thru Current 
Week Of Season . . . No Extra Charge 


Standings vs Line 
Stats — Accumulated & Average 
1983-1985 Data Base 


Auto Opponent Input 
Printed Copy All Screens 
Easy Update—Playoffs/1987 
Dealer Inquiries Invited 


ORDERS SHIPPED IN 2 DAYS 
PHONE LINES OPEN 24 HRS. 


MaratHon Sortware Dept. G 
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If you've discovered a clever time- 
saving technique or a brief but 
effective programming shortcut, 
send it to “Hints & Tips,” c/o 
COMPUTE!’s GAZETTE. If we use it, 
we'll pay you $35. We regret that, 
due to the volume of items submit- 
ted, we cannot reply individually 
to submissions. 


Commas And Colons 
Not Allowed 
Steven Dodds 


One of the main problems with the 
INPUT command is that it won't 
read past a comma (,) or colon (:), If 
the person using the program en- 
ters either of these characters dur- 
ing an input routine, the computer 
rudely responds with an 7EXTRA 
IGNORED message. 

On the 64, one solution is to 
place POKE 631, 34: POKE 198, 1 
just before the INPUT line. This 
puts a quotation character (‘’) into 
the keyboard buffer. (The INPUT 
routine accepts commas and colons 
within quotation marks.) On the 
Plus/4 and 16, substitute POKE 
1319, 34: POKE 1343, 1, and on the 
128, POKE 842, 34: POKE 208,1. 
This method isn’t perfect, though. 
If the user types a quotation mark 
as part of the input, the effect of the 
POKEd quote is negated. 

Another more interesting solu- 
tion is to call a built-in ROM routine. 
The routine beginning at location 
44025 on the 64 reads keypresses 
and puts ASCII values into the input 
buffer at 512. After the SYS 44025, 
just PEEK 512 and following loca- 
tions. The end of the input is 
marked by a zero byte. Try running 
the following program on a 64: 
PRINT"ENTER NAME" 

SYS 44025 

FORX=512T0608 

A=PEEK (X) : IFA=OTHENX=900 
:GOTO6S 

BS=BS$+CHR$ (A) 

NEXT 

PRINT"YOU ENTERED "7B$ 


MX 10 
GK 26 
PX 38 
RD 40 


FK 59 
GI 68 
MF 70 





If youre using a 128, substitute 
BANK 15: SYS 20371 in line 20 and 
change the FOR-NEXT loop in line 
30 to count from 512 to 771, On the 
Plus/4 and 16, replace line 20 with 
SYS 37190 and count from 512 to 
609 in line 30. 

The FOR-NEXT loop could be 
revised to watch for certain types of 
input. When entering a person’s 
name, some people type the last 
name, a comma, and the first name. 
Others might type first name and 
then last name, separated by a 
space. While the FOR-NEXT loop is 
checking the input buffer, a comma 
would indicate that the last name 
was typed first. If a single space di- 
vides the names, the user probably 
typed the first name first. Checking, 
for commas and spaces would 
make your program smart enough 
to accept both types of input. 

Another way to use this rou- 
tine is in an adventure game parser. 
Spaces separate words, commas 
separate items in a list, and periods 
end sentences. By looking for cer- 
tain characters and punctuation 
marks, you'll be able to figure out a 
little more easily which commands 
have been typed. 


Disabling Keys On The 64 
Timothy R. Alexander 


Several characters lead to trouble 
within an INPUT statement. Com- 
mas and colons trigger the 7EXTRA 
IGNORED error mentioned above. 
The cursor-up and -down keys can 
make the screen scroll. And CLR 
clears the screen, which erases any 
kind of menu of choices you might 
have printed on the screen. 

There are times when it would 
be simpler to disable certain keys 
during input. The program below 
does just that. It’s a short machine 
language routine, for the 64 only, 
which copies BASIC and the Kernal 
from read only memory (ROM) to 
the random access memory (RAM) 
underneath. It then modifies the 





Customized Input 


keyboard matrix decode tables, 
which start at location 60289, to ig- 
nore the comma, colon, cursor-up, 
cursor-down, CLR, and HOME 
keys. The rest of the keyboard is 
unaffected. 


BS 10 FORX=828T0875 :READA:CK=C 
K+A:POKEX,A 

PH 20 IF CK<>8492 THEN PRINT"P 
LEASE CHECK THE DATA STA 
TEMENTS ": END 

cB 30 SYS828 

MJ 828 DATA 120,169,000,168,13 

3,251 

DATA 169,166,133,252,17 

7,251 

DATA 145,251,136,208,24 

9,230 

DATA 252,208,245,169,25 

5,141 

DATA 136,235,141,174,23 

5,141 

DATA 176,235,141,186,23 

5,141 

DATA 201,235,141,245,23 

5,169 

DATA @58,141,676,171,08 

8,096 





XQ 834 
GA 840 
PP 846 
HF 852 
SF 858 
DP 864 


EB 878 


You may use this as a stand- 
alone program or as a one-shot sub- 
routine within a larger program. To 
turn the six keys off, place a POKE 
1, 53 in your program just before 
the INPUT statement. To turn the 
keys back on, POKE 1, 55: 

CG 10 POKE1,53 


QS 20 INPUTAS:PRINTAS 
EK 30 POKE1,55 


Since the first POKE disables 
the comma, you won't be able to 
type the second POKE in direct 
mode; it needs a comma between 
the 1 and 55. If you get stuck in di- 
rect mode without a comma, press 
RUN/STOP-RESTORE. The key- 
board will go back to normal. 

There’s a much simpler way to 
use this technique on the Commo- 
dore 128. See ‘‘KeyDef” in the 
August issue. @ 
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Fred D'Ignazio 
Associate Editor 


Recently I visited the National As- 
sociation of Music Merchants 
(NAMM) Show in Chicago, a twice- 
a-year extravaganza showcasing all 
the latest musical instruments, from 
nine-foot concert grand pianos to 
electronic harmonicas and violins. I 
carried my little Sony 8mm cam- 
corder with me to shoot some of the 
show’s highlights. Here’s what I saw: 


* The BrocktronX Drum Suit. 
The inventor, Brock Seiler, demon- 
strated the drum suit to crowds of 
enthusiastic showgoers. He 
strapped drum suit pads around his 
waist and thighs, and wore percus- 
sion-sensing boots (to make “‘Stom- 
percussion”). All the parts of the 
drum suit were MIDI-connected to 
electronic keyboards and drum ma- 
chines, Brock created some impres- 
sive music by banging on different 
parts of his body with two wooden 
drumsticks. 

* The Dynacord Rhythm-Stick. 
The Rhythm-Stick looks like a fan- 
cy electric guitar—minus the 
strings. The Rhythm-Stick is really 
nota guitar at all, but a drum in dis- 
guise. You play the Stick by thump- 
ing on it with your fingers, 
Different parts of the Stick can be 
programmed to make different 
drum sounds, including high-hats, 
hand claps, tom-toms, cymbal 
crashes, and so on, 

* The Casio SK-1 Digital Sam- 
pling Keyboard. At $130, the SK-1 
costs only one-tenth as much as 
professional sampling keyboards. 
Its sampling rate is low (only 9.3 
kHz), but it creates credible sounds, 
and you can carry it anywhere and 
record any sound—such as a door- 
bell, telephone ring, or dog barking. 
Hal Leonard Publishing Company 
and Sight & Sound make book/cas- 
sette packages that give you dozens 
of prerecorded sample sounds to re- 
cord on your keyboard. Once the 
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sound is in the keyboard, it ap- 
pears—at a different pitch—when 
you press each of the keyboard's 32 
keys. 

+ The Roland Digital Piano. 
Three members of our family play 
the piano, and we were recently 
hunting for a good used baby 
grand. We found one, but we 
couldn’t afford the price its owners 
wanted—$5,000. Now we've found 
an alternative: the Roland Digital 
Piano. An extra piano module fits 
in a box the size of a briefcase. The 
piano keyboard has 88 full-sized, 
weighted wooden keys and a stand. 
The entire unit costs only $1,400. 

The sound that comes out of 
the piano is unreal—just like that of 
a nine-foot Steinway grand piano. 
And if you get tired of that, you can 
switch to a harpsichord or a bar- 
room honkey-tonk. The instrument 
has a MIDI connection, so you can 
plug it into other electronic instru- 
ments (like the 64 or 128) in your 
music studio. 

There were almost as many 
microcomputers at the NAMM 
Show as keyboard synthesizers and 
guitars. Here are some of the 64 and 
128 products that I saw during my 
NAMM wanderings: 


* SampleScope. You plug your 
AKAIS-612 sampler into your 64 or 
128 and boot up SampleScope to edit 
sound samples by manipulating 
graphic images of the sampled 
sound wave on the computer dis- 
play screen (Ultimate Media, 275 
Magnolia Ave., Larkspur, CA 
94939), 

+ Korg 800 Series Software. 
You connect your 64 or 128 to a 
Korg 800 series keyboard via a 
MIDI interface—for example, Korg/ 
Passport’s MH01-C or MH02-C, 
Music Data’s MIDI Interface, or Dr. 
T’s Interface (Korg USA, 89 Frost 
St., Westbury, NY 11590). 


+ Passport Hardware/Soft- 
ware. Passport Designs can be your 








Drum Suits, Rhythm Sticks, 
And Digital Pianos 


“one-stop store” for MIDI hard- 
ware and software for 64 and 128 
computers, including the Passport 
MIDI Starter Kit, the Passport MIDI 
Home Pac, the Education Pac, the 
MIDI Beatles Album, the MIDI 
Voice Librarian, and the Passport 
MIDI Interface (Passport Designs, 
625 Miramontes St., Half Moon 
Bay, CA 94019). 

+ Sonus Software. Sonus’s 
new “Super Sequencer 128” ($275) 
is a professional recording system 
and librarian for the Commodore 
128. It lets you record up to 16 se- 
quences (song parts) on eight sound 
tracks from your keyboard synthe- 
sizer to your 128. Sonus also pub- 
lishes several other programs, 
including the ‘Super Sequencer 
64,” the “MIDI processor,” and the 
“RX-11, 15, 21” for controlling a 
Yamaha drum machine (Sonus, 
21430 Strathern, Suite H, Canoga 
Park, CA 91304), 

* Syntech’s MIDI Interface 
and Studio One. Syntech’s MIDI 
Interface and Studio One turn your 
64 or 128 into a multitrack record- 
ing studio (Syntech Corporation, 
5699 Kanan Rd., Agoura, CA 91301). 

* Education Courseware Sys- 
tems/MEI/Computers & Me. ECS, 
MEI, and Computers & Me have a 
large array of 64 and 128 software 
and hardware products that teach 
music concepts and interpretation 
to music students (Electronic 
Courseware Systems, 1210 Lancas- 
ter Dr., Champaign, IL 61821; MEI, 
328 E-1 1300 North, P. O. Box 599, 
Chesterton, IN 46304; Computers 
& Me, Ashbrook Rd., Exeter, NH 
03833-9733). @ 














MACKING AMGUAGEe 
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Dacinners 


Richard Mansfield 
Senior Editor 


Why do people learn machine lan- 
guage? The answer is that it’s the 
best possible, most effective way to 
program a computer. 

Other languages are compro- 
mises because they have to be 
translated before the computer can 
understand them. Machine lan- 
guage (ML) speaks directly to the 
computer's brain, its microproces- 
sor, in the language the micro- 
processor itself uses. That’s why it’s 
called machine language. 


The Most Effective Programs 
Every other language has a provi- 
sion for calling ML subroutines to 
help speed things up. In BASIC, the 
provision is the SYS command, 
which transfers control of the com- 
puter to an ML routine located at 
the address of the SYS. SYS 40000 
will cause the BASIC interpreter to 
stop while the ML located at ad- 
dress 40000 executes, There’s also a 
provision for returning control to 
BASIC: ML’s RTS command. 

But why all this concern about 
speed? Computers are fast, very 
fast, Why would we need to maxi- 
mize their velocity? 

Let's look at an example. Sup- 
pose you want to write a word pro- 
cessor. You make a list of the 
features you want to include and 
then program it in BASIC. When 
you run it, you find that it moves 
ponderously, taking 40 seconds to 
search for a particular word in a 
short document. 

So, because it is by far the most 
effective way to program a com- 
puter, many people take the time to 
learn ML. As you'll see, it’s only a 
mystery until you know a bit about 
it, 


What You Need To 
Get Started 


Now let's get going. You'll need a 





special tool to write a machine lan- 
guage program: an assembler. The 
Commodore 64 comes with BASIC 
built in, so you simply start typing 
in a BASIC program and it can be 
run without further ado. However, 
when you write an ML program, it 
must be analyzed by an assembler 
and translated into the raw num- 
bers which make up an executable 
ML program. This month's pro- 
gram is a simple assembler, written 
in BASIC. After you type it in, 
you'll be ready for the first lesson. 
(Commodore 128 users should be 
in 40-column mode.) 

Load the assembler into your 
64 or 128. Then type RUN. You'll 
see a list of available options, but 
let’s ignore them for now. When 
the assembler asks you where you 
want your finished ML program to 
start in memory, type in 1824 and 
press RETURN. The screen will go 
blank, and the assembler will print 
the first “line number,” which is 
really the address where the assem- 
bler will POKE your first command. 
Next, type LDA #0 and press RE- 
TURN. The assembler will do two 
things: It will show you the num- 
bers it translated (169 and 0) and 
POKE them into memory. Since 
we're storing this little ML program 
into screen RAM, you'll actually see 
the ML being built on the screen 
(you can put ML programs virtually 
wherever you want in RAM). 

Next type in TAY. Then STA 
1024Y. (If you're using a 64, you 
need to type an extra line—STA 
55296Y—following STA 1024Y, to 
fill color memory.) Then type DEY, 
and after that, BNE 1827. Then 
RTS. And finally, END. In each 
case, press RETURN after typing in 
the instructions. If you make a mis- 
take, the assembler will tell you and 
will reprint the address so you can 
try again. If you make a big mistake, 
such as hitting RUN/STOP-RES- 
TORE, you'll need to run the as- 
sembler and start over. 








The First Steps 


Here’s what you should see on 
your screen if you use a 128: 


1824 ?7LDA_ #0 1690 
1826 ? TAY 168 
1827 ?STA 1024Y 15304 
1830 ? DEY 136 
1831 ?BNE 1827 208 250 
1833 ? RTS 96 
1834 ? END 


PROGRAM IS FROM 1824 TO 1834 


And here’s what you see if you use 
a 64; 


1824 ?7LDA #0 1690 
1826 ? TAY 168 

1827 ?7STA 1024Y 15304 
1830 ?STA 55296Y 1530216 
1833 ? DEY 136 

1834 ?BNE 1827 208 247 
1836 ? RTS 9% 

1837 2? END 


PROGRAM IS FROM 1824 TO 1837 


Try It Out 

After you type END, the assembler 
returns you to the normal BASIC 
mode. Those strange symbols near 
the bottom of the screen are the 
complete ML program. Be very 
careful that you don’t type any- 
thing over them, and don’t do any- 
thing that would cause the screen to 
scroll or clear. That would wipe out 
the program. When you run the 
program, it will print (no, print sug- 
gests that it will be slow; it will slap) 
256 @ characters on your screen, 
Try it. Type SYS 1824. 

Next month, we'll explain 
what these odd three-letter com- 
mands mean, and we'll build a use- 
ful utility program in ML. 

See program listings on page 115.@ 
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simple answers 
tO COMMON GuESsWONS 


Each month, COMPUTE!’s GAZETTE 
tackles some questions commonly asked 
by Commodore users. If you have a 
question you'd like to see answered 
here, send it to this column, c/o 
COMPUTE!’s GAZETTE, P.O. Box 
5406, Greensboro, NC 27403. 


Q. Is there any way to change 
isk name without reformatting 
and losing the rest of the material 
which might be on the disk? I 
haven't been able to locate any 
information that applies to this 
problem. 


A. There’s no easy way to do 
this. The disk name which you as- 
sign when formatting a disk (for ex- 
ample, OPEN 15,8,15:PRINT #15, 
NEWO:diskname,ID’’:CLOSE 15) 
remains in the disk directory until 
the disk is reformatted. And, of 
course, reformatting wipes out any 
existing information on the disk. 

Itis possible to change the disk 
name by using a special utility pro- 
gram which lets you examine and 
alter individual sectors and bytes 
on the disk. An example of this type 
of utility is ‘Disk Editor,’ pub- 
lished in the February 1986 issue. 
However, this technique is recom- 
mended only for advanced users, 
since it’s very easy to scramble the 
directory and mess up the whole 
disk if you’re not absolutely sure 
what you’re doing. 

A safer—though more te- 
dious—way to change the disk 
name would be to copy all the files 
you want to save onto a scratch 
disk, reformat the original disk with 
the new disk name you desire, and 
then copy all the files back onto it 
from the scratch disk. 





e Before acquiring my 
Plus/4, I had read that it would 
not run BASIC programs written 
for the Commodore 64. However, 
I now have several programs that 
were written for the 64 that run 
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fine on the Plus/4. These range 
from a database manager to a tax 
record program. My question is, 
why not write all BASIC programs 
in a format that can be run on all 
Commodore 64s and Plus/4s? I 
know that machine language pro- 
grams must be different, but 
BASIC programs can work for the 
64, Plus/4, and 128 in 64 mode. 


A. It is possible to write BASIC 
programs that will work on both 
the Commodore 64 and Plus/4. It’s 
also possible to write BASIC pro- 
grams that will run interchangeably 
ona Commodore, Apple, Atari, and 
IBM. But the programs would have 
to be very limited in scope and 
function. You’d have to restrict 
yourself to the fundamental com- 
mands which are common to nearly 
all versions of BASIC, avoiding the 
more advanced commands that 
take advantage of machine-specific 
features, Programs written for dif- 
ferent computers have to consist 
entirely of text and use no fancy 
screen formatting, no graphics, no 
color, and no sound, 

The BASIC programs you men- 
tion—including a database manager 
and a tax record program—appar- 
ently meet these requirements. So 
would many other simple BASIC 
programs. But more complex pro- 
grams which attempt to make the 
most of a computer's special fea- 
tures just cannot be made to work in 
different dialects of BASIC. The 
commands for using these features 
have little or nothing in common. 

For example, the Plus/4’s 
BASIC includes several commands 
that make it relatively easy to create 
graphics and sound. But the Com- 
modore 64’s BASIC does not. 
Graphics and sound on the 64 must 
be accomplished with PEEKs and 
POKEs, commands which directly 
access memory locations within the 
computer. These PEEKs and 
POKEs won’t work on the Plus/4 








Tom R. Halfhill, Staff Editor 


because the two computers have 
different memory layouts, 

Also, parts of some BASIC pro- 
grams are written in machine lan- 
guage to improve performance. It 
would be a lucky coincidence in- 
deed if these machine language 
routines happened to work on a 
computer for which they weren’t 
designed, 

In a way, it’s unfortunate that 
so few computers are compatible 
with each other, even when pro- 
grams are written in what's sup- 
posed to be the same language. But 
this is what makes it possible to 
have many different computers to 
choose from, each with its own 
unique combination of special 
features. 


e I want to answer the ques- 
tion from the reader about hook- 
ing up VIC-20/Commodore 64- 
style joysticks to the Plus/4 and 
Commodore 16 [“Simple Answers 
to Common Questions,” June 
1986]. There is a store in West 
Germany that has the proper in- 
terface cable. Its address is Con- 
rad Electronic Center GmbH & 
Co., Kurfurstenstrasse 145, 1000 
Berlin 30, West Germany, The 
adapter costs 6.90 in German 
marks, which is about $3 in U.S. 
currency (excluding postage). If 
you write, ask for the Computer- 
katalog II. I’m enclosing an order 
form. 


A. Our thanks to Axel R. Ober- 
hauser of the Province of Buenos 
Aires, Argentina, for supplying this 
information. Incidentally, the order 
form he enclosed bears another ad- 
dress for this company: Conrad 
Electronic GmbH, Klaus-Conrad- 
Str. 1, Postfach 11 80, D-8452 
Hirschau, West Germany. You 
might try writing either or both ad- 
dresses. Write to the attention of 
the Geschaftsfiihrer (proprietor), 
Klaus Conrad. @ 








User Group 
Update 


When writing to a user group for information, please remember to en- 
close a self-addressed envelope with postage that is appropriate for the 


country to which you're writing. 


Send typed additions, corrections, and deletions for this list to: 


COMPUTE! Publications 

P.O, Box 5406 

Greensboro, NC 27403 

Attn: Commodore User Groups 


User Group Notes 


The Central Dakota Commodore Club’s new address is Rt. 3, Captain 


Leach Dr, #12, Mandan, ND 58554, 


The Champaign-Urbana Commodore Users Group’s new address is 802 


N. Parke St., Tuscola, IL 61935 


The Tulsa Area Commodore User’s Group (TACUG) has a new ad- 
dress: 2851 East 21st Place, Tulsa, OK 74114. 


The Crossroads Commodore User's Group has changed its address to 


609 Cambridge, Victoria, TX 77901, 


New Listings 


CALIFORNIA 


Commodore Hayward Users Group, P.O. Box 
2072, San Leandro, CA 94577 


Pros and Newcomers in Commodore (PANIC), 
c/o Vermilion County ESDA, 2 E. South St., 
Danville, IL 61832 


Acadiana Commodore Computer Club (ACCC), 
P.O. Box 31412, Lafayette, LA 70503 


Columbia Commodore Users, P.O. Box 7633, 
‘Columbia, MO 65205 


NEW JERSEY 

Garden State Commodore User Group, 89 Strat- 
ford Rd., Tinton Falls, NJ 07724 

Hunterdon Commodore Users Group, P.O. Box 
724, Flemington, NJ 08822 
NEW YORK 

St. Francis College Microcomputer Users’ 
Group, Microcomputer Center, 180 Remsen St., 
Brooklyn, NY 11201 





OHIO 

Cuyahoga Falls Commodore Club, P.O, Box 
3025, Cuyahoga Falls, OH 44225 
TEXAS 


General Users Group (GUG), P.O, Box 3348, 
Stinnett, TX 79083 


WEST VIRGIN 
Mid-Ohio Valley Commodore Club, Inc. 


(MOVCC), P.O, Box 2222, Parkersburg, WV 
26101-2222 


Outside The U.S. 


AUSTRALIA 

Yarra Valley Commodore Users Group, P.O. Box 
176, Lilydale, Vic., 3140, Australia 
LAVAL 

Curitiba Commodore Club (C.C.C), Rua Adolfo 
Stedile, 52, Bom Retiro, 80.520, Curitiba, Parana, 
Brasil 
FINLAND 

CSI, c/o Christer Nybergh, Ylapellontie 1.as.1., 
39500 Tkaalinen, Finland 





> 


| 





oe HEAVY 32-01, Vit 


Ik Choice of Colors 


COMPUTERS 
C64) Plus 4 8.00 
C128 13,00 
Dotossette (C2N) .... 5.00 
‘Amiga 1000 13.00 
(W/Amiga Men, Stacked) 28.00 

Keyboard only... 7.00 
Atori BOOXL, 130XE 10.00 
‘Atori $20 $t 14.00 
'520 Keyboard (only) 10,00 
1m Pc/xr 28.00 
TBM $051 Keyboord 8.00 


(Dimensions Required 
{or IDM Clones) 


DISK ORIVES, 

C.1S41, C1571 8.00 
‘Amiga 344" D/Drv 8.00 
‘Amiga 54" B:Ore .. 9.00 


Indust GT, MED $D-1 8.00 


MSO $0.2 10.00 
Enhancer 2000 8,00 
F501 8,00 
Avari 1030 8.00 





PRINTERS 
-1525/MPS 801 
6-1526/0S 802 


10.00 
13,00 





(Foreign aie 





(213) 862. 


INYL ANTLSTATIC 


ok EXTENDS EQUIPMENT LIFE 


ght Ton or Brown 


PRINTERS 
GMPS/803, C:1520 
Panasonic 1090/9) 


DUST COVERS 


2 CUSTOM MADE TO FIT 


8.00 
13.00 


Gemini 10 & Star 10's 13.00 
Gemini 15 & Stor 15's 16.00 


Okidota 92 
Okidata 120/192 
Okimate 10/20 
Epion MX/FX/RX8O 
Epion 1x60/C-1000, 
Selkosha $P-1000 
Comrex 220 

toh 7500 

Citizen MSP 10 
‘Atari 1027 

C/0PS 1101 


MONITORS 
C-1702, BMC Color 
€:1902/ Amiga 
‘Amdek 500-700 
Teknika MJ 10/22 
CM-141 (C1802) 
Gold Stor 13" Color 


13.00 
13,00 

8.00 
13,00 
13,00 
13.00 
13.00 
13.00 
13,00 
13,00 
18.00 


16.00 
19.00 
19.00 
19.00 
19.00 
19.00 


Thompion CM 365.66 19.00 
C:1902A/Magnys 40 19.00 


‘Magnavox 80 
NEC 1225 
Toxon 220 
Sokota $C-100 
Zonith 122/129 
Zenith 131/133 


839) 


19.00 
19.00 
19.00 
19.00 
19,00 
23,00 


‘Order by stating MAKE, MODEL ond COLOR CHOICE - TAM or BROWN with 
check or maney order pls $1.50 per item (3450 max) shipping and handing 
Coll Rs, fcude 65% State Tex 
SPECIAL COVERS WILL BE MADE TO YOUR 
DIMENSIONS, SEND YOUR REQUIREMENTS, 
FOR OUR LOW PRICE QUOTES, 


Crown Custom Covers 
9606 SHELLYNIELO RO., Dept. A 
DOWNEY, CA 90240 
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A Gateway To 
Machine Language 


Richard Mansfield, Senior Editor 


The following machine language (ML) equivalents for 
BASIC commands represent only one of several possi- 
ble solutions to each programming goal. There are 
usually many ways in ML to accomplish a given task 
because ML is so much freer than BASIC. Of these 
choices, one might work faster, one might take up less 
memory, and one might be easier to program and un- 
derstand. For this article, example routines were select- 
ed to favor those which are easier to program and 
understand. 

In any case, at ML’s extraordinary speeds, and 
with the large amounts of RAM memory available to 
today’s computerists, it will be rare that you will need 
to opt for velocity or memory efficiency. 


CLR 

In BASIC, this clears all variables. Its primary effect is 
to reset pointers. It is a somewhat abbreviated form of 
NEW since it does not “blank out’ your program as 
NEW does. 

CLR, in fact, is rarely used. 

We might think of CLR, in ML, as the initialization 
phase of a program which erases (fills with zeros) the 
memory locations you've set aside to hold your ML 
flags, pointers, counters, and so on. 

Before an ML program runs, you will usually want 
to be sure that some of its variables are set to zero. If 
they are in different places in memory, you will need to 
zero them individually: 
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If you're thinking about learning—or starting to explore—machine language, here’s 
an effective approach to this powerful and fascinating programming language. This 
small dictionary, arranged alphabetically, includes all the major BASIC commands. 
If you need to accomplish something in machine language—TAB, for example—look 
it up in this article to see how it’s done. If you already understand BASIC, you'll 
find this an efficient way to quickly grasp the fundamentals of machine language, 
your computer's. own native tongue. Excerpted from 128 Machine Language for 
Beginners (COMPUTE! Books, 1986), some of the information here is 128-specific, 
but most applies directly to any Commodore computer. 


2000 LDA #$0 

2002 STA $1990 Put zero into one of the 

“variables.” 

STA $1994 Zero another byte which needs to 
be initialized, 


2005 


On the other hand, if you've put all your variables 
together at the end of your ML program, the job is easy: 
Just loop through the list, putting zero in each variable. 
BASIC sets up a group of its variables (pointers) in zero 
Page, so you can use a loop to zero them out: 


2000 LDA #$0 

2002 LDY #§0F  Y will be the counter. There are 15 
bytes to zero out in this example. 

2004 STA $199,Y The highest of the 15 bytes. 

2007 DEY 

2008 BNE $2004 Let Y count down to zero, BNEing 
until Y is zero, then the Branch if 
Not Equal will let the program fall 
through to the next instruction at 
$200A. 

CONT 


This BASIC command allows your program to pick up 
where it left off after a STOP command. You might 
want to look at STOP, below. In ML, you can’t usually 
get a running program to stop with the RUN/STOP 
key. If you like, you can write a subroutine which 
checks to see if a particular key is being held down on 








the keyboard and, if it is, BRK: 


3000 JSR  $FFE4; Routine to get the key currently 
ressed, 

If nothing is currently pressed, 

keep looking. 

This is the RETURN key on your 

machine, but you'll want to CMP 

here to the value that appears in 

the “currently pressed’ byte for 

the key you select as your “stop” 

key. It could be any key. If you 

want to use A for your “stop” key, 

try CMP #$41. 

If it’s not your target key, jump to 

RTS, 

If it is the target, BRK... 

back to the routine which called 

this subroutine. 


3003 BEQ 3000; 


3005 CMP #13 


3007. BNE $300A 


3009 
300A 


BRK 
RTS 


However, the above routine requires that some key 
be pressed. It will keep branching back to 3000 until 
someone touches a key. This is the kind of input you 
would use when you had printed a menu and wanted 
the program to pause until a selection was made. 

There is, however, a location in zero page, the byte 
at $D4 on the 128, $CB on the 64, which detects key- 
presses on the fly. You could LDA $D4:CMP #10:BEQ 
FOUNDA (FOUNDA is the label you gave a routine 
that does something whenever the user presses the A). 
Notice that the code for the letter A has a value of ten 
here. Unlike a JSR $FFE4, the value returned from loca- 
tion $D4 is not regular ASCII. It’s a different code, the 
“keyboard matrix code,” and there’s no use learning it 
or having a chart of it. Carriage return is 1, the letter A 
is 10; when no key is pressed, $D4 contains an 88 (the 
64’s $CB contains, appropriately, a 64). If you need to 
know sometime what value will be in $D4 for a partic- 
ular keypress, just look at $D4 via BASIC with this sim- 
ple program: 

10 PRINT PEEK(212);;GOTO 10:REM USE PEEK(203) ON 
THE 64 
and then press the key you’re interested in. 

Now back to CONT, the matter at hand, The 8502 
or 6502 chips place the program counter (plus two) on 
the stack after a BRK. A close analogy to BASIC is the 
placement of BRK within ML code to cause a halt to 
program execution. Then, after examining registers or 
variables or buffers (places that hold input or output 
before it’s received or sent), you can restart your pro- 
gram by using the monitor G (go) command. G is the 
equivalent of CONT. 


DATA 
In BASIC, DATA announces that the items following 
the word DATA are to be considered pieces of infor- 
mation (as opposed to being thought of as parts of the 
program). That is, the program will probably use this 
data, but the data elements are not BASIC commands. 
In ML, such a zone of “nonprogram’ is called a ta- 
ble. It is unique only in that the program counter never 
starts trying to run through a table to carry out instruc- 
tions. This never happens because you never transfer 
program control, using JMP, JSR, or a branching in- 
struction, to anything within a table. (This is similar to 
the way that BASIC slides right over DATA lines.) 


There are no meaningful instructions inside a table. 

To keep things simple, tables of data are usually 
stored together either above or below the program. 
Usually, tables are stored above, at the very end of the 
ML program (see figure below). 

Tables can hold messages that are to be printed to 
the screen, hold variables, hold flags (temporary indi- 
cators), and so on. If you disassemble your BASIC in 
ROM, you'll find the words STOP, RUN, LIST, and so 
forth, gathered together in a table. You can suspect a 
data table when your disassembler starts giving lots of 
22? error messages. It cannot find groups of meaningful 
opcodes within tables. 


Typical ML Program Organization 


DATA ~<—Bottom of Memory 
INITIALIZATION |+—Start of ML Program 


MAIN 
LOOP 
SUBROUTINES 
DATA 


DIM 

With its automatic string handling, array management, 
and error messages, BASIC makes life easy for the 
programmer. 

The price you pay for this hand holding is that it 
slows down the program when it’s run. In ML, the 
DIMensioning of space in memory for variables is not 
explicitly handled by the computer. You must make a 
note that you are setting aside memory from $6000 to 
$6500, or whatever, to hold variables. It helps to make 
a simple map of this “dimensioned” memory so that 
you know where permanent strings, constants, vari- 
able strings, and variables, flags, and so on, are within 
the dimensioned zone. Because this set-aside memory 
will not contain meaningful ML instructions, it is gen- 
erally placed at the end of the actual ML program. 

A particular chunk of memory (where, and how 
much, is up to you) is reserved; that’s all. There are no 
ML instructions which set aside the memory. That's 
why it’s best to place tables at the end of your program, 
This way, they can be enlarged conveniently without 
affecting any other part of the program. 


END 
There are several ways to make a graceful exit from ML 
programs. You can jMP to the “warm start” address 
($4003). Or you can go to the “cold start” address 
($4000). 

If you went into the ML from BASIC with a SYS, 
you can return to BASIC with an RTS. Recall that every- 
JSR matches up with its own RTS. Every time you use a 
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JSR, it shoves its “return here” address onto the top of 
the stack. If the computer finds another JSR (before any 
RTS), it will shove another return address on top of the 
first one. So, after two JSRs, the stack contains two re- 
turn addresses. When the first RTS is encountered, the 
top return address is lifted from the stack and put into 
the program counter so that the program returns con- 
trol to the current instruction following the most recent 
JSR. 

When the next RTS is encountered, it pulls its ap- 
propriate return (waiting for it on the stack), and so on. 
The effect of a SYS from BASIC is like a JSR from with- 
in ML, The return address to the correct spot within 
BASIC is put on the stack. In this way, if you are within 
ML and there is an RTS (without any preceding JSR), 
what's on the stack will be a return-to-BASIC address 
left there by SYS when you first went into ML. 

Another way to END is to put a BRK in your ML 
code. This drops you into the machine's monitor on the 
128 (there is no internal monitor on the 64). Normally, 
you use BRKs during program debugging. When the 
program is finished, though, you would not want this 
ungraceful exit any more than you would want to end a 
BASIC program with STOP. 

In fact, many ML programs, if they stand alone 
and are not part of a larger BASIC program, never end 
at all, They are an endless loop. The main loop just 
keeps cycling over and over. A game will not end until 
you turn off the power. After each game, you see the 
score and are asked to press a key when you are ready 
for the next game. Arcade games which cost a quarter 
will ask for another quarter, but they don’t end. They 
go into “attract mode.” The game graphics are left run- 
ning onscreen to interest new customers. 

An ML word processor will cycle through its main 
loop, waiting for keys to be pressed, words to be writ- 
ten, format or disk instructions to be given. Here, too, it 
is common to find that the word processor takes over 
the machine, and you cannot stop it without turning 
the computer off. Among other things, such an endless 
loop protects software from being pirated. Since it 
takes control of the machine, this makes it harder for 
someone to save it or examine it once it’s in RAM. 
Some such programs are “autobooting” in that they 
start themselves running as soon as they are loaded 
into the computer. 

BASIC, itself an ML program, also loops endlessly 
until you power down. When a program is running, ail 
sorts of things are happening. BASIC is an interpreter, 
which means that it must look up each word (like INT) 
it comes across during a RUN (interpreting, or translat- 
ing, its meaning into machine-understandable JSRs). 
Then, BASIC executes the correct sequence of ML ac- 
tions from its collection of routines. 

In contrast to BASIC RUNs, BASIC spends 99 per- 
cent of its time waiting for you to program with it. This 
waiting for you to press keys is its endless loop, a tight, 
small loop indeed. 

It would look like our “which key is pressed?” 
routine: 

2000 LOOP LDA $D4; THE “WHICH KEY IS BEING 

PRESSED” LOCATION 
2002 CMP #88; IF 88, KEEP LOOPING 
2004 BEQ LOOP 
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If there is an 88 in $D4, this means that no key has 
been pressed. So, we keep looping until the value in 
address $D4 is something other than 88. This setup is 
similar to INPUT in BASIC because not only does it 
wait until a key is pressed, but it also leaves a unique 
value of the key in the accumulator when it’s finished. 


FOR-NEXT 

Everyone has had to use delay loops in BASIC (FOR T 
= 1 TO 1000: NEXT T) which are also tight loops, 
sometimes called do-nothing loops because nothing 
happens between the FOR and the NEXT except the 
passage of time. For example, when you need to let the 
user read something on the screen, it’s sometimes easi- 
er just to use a delay loop than to say, “When finished 
reading, press any key.” 

In any case, you'll sometimes need to use delay 
loops in ML just to slow ML itself down. In a game, the 
ball can fly across the screen. It can get so fast, in fact, 
that you can’t see it. It just “appears’’ when it bounces 
off a wall. And, of course, you'll need to use loops in 
many other situations. Loops of all kinds are funda- 
mental programming techniques. 

In ML, you don’t have that convenient little 
counter (T in the BASIC FOR-NEXT example above) 
which decides when to stop the loop. When T becomes 
1000, go to the instructions beyond the word NEXT. 
Again, you must set up and check your counter variable 
by yourself. 

If the loop is going to be smaller than 255 cycles, 
you can use the X register as the counter—Y is saved 
for the very useful indirect indexed addressing. Any- 
way, by using X, you can count down from 200 to 0: 


2000 LDX #200 (or $C8 hex) 
2002 DEX 
2003 BNE $2002 


For loops involving counters larger than 255, 
you'll need to use two bytes to count down, one going 
from 255 to 0 and then clicking (like a gear) the other 
(more significant) byte. 

To count to 512; 


2000 LDA #$2 

2002 STA $6000 Put the 2 into address 6000, our 
MSB, most significant byte, 
counter. 

2005 LDX #$0 Set X to 0 so that its first DEX will 
make it 255. Further DEXs will 
count down again to 0, when it 
will click the MSB down from 2 to 
1 and then finally to 0, 

2007. DEX 

2008 BNE $2007 

200A DEC $6000 Click the number in address 6000 
down 1, 

200D BNE $2007 


Here we used the X register as the LSB (least sig- 
nificant byte) and address 6000 as the MSB. Why use 
address 6000? Why not? Use any RAM byte you want 
that won't interfere with other things going on in the 
computer. In practice, you'll want to set aside a byte in 
your tables at the end of your ML program to be sure 
that it’s not going to interfere with something. See 
DATA above for a discussion of tables. 








We could use addresses $FA and $FB to hold the 
MSB/LSB if we wanted. This is commonly useful be- 
cause then address $FA (or some available, two-byte 
space int zero page) can be used for LDA ($FA),Y. You 
would print a message to the screen using the combi- 
nation of a zero-page counter and LDA (zero-page 
address),Y. 


FOR-NEXT-STEP 

Here you would just decrease your counter (usually X 
or Y) more than once. To create FOR I = 100 TO 1 
STEP —2 you could use: 


2000 LDX #100 
2002. DEX 
2003 DEX 
2004 BNE $2002 


For larger numbers you create a counter which 
uses two bytes, working together, to keep count of the 
events. Following our example above for FOR-NEXT, 
we could translate FOR I = 512 TO 0 STEP —2: 


2000 LDA #$§2 

2002 STA COUNTER This is going to hold our MSB. 

2005 LDX #$0 X is holding our LSB. 

2007 DEX 

2008 DEX Here we click X down a second 
time, for —2. 

2009 BNE $2007 

200B DEC COUNTER 

200E BNE $2007 


COUNTER .BYTE 0; A single byte set aside in our 
Tables 


To count up, use the CoMPare instruction. FOR I 
= 170 50 STEP 3: 


2000 LDX #$0 
2002 =INX 
2003. ~INX 
2004 =INX 
2005 CPX #50 
2007 BCS $2002 


For larger STEP sizes, you can use a nested loop 
within the larger one. This would avoid a whole slew 
of INXs. To write the ML equivalent of FOR I = 1 TO 
50 STEP 10: 


2000 LDX #$0 
2002 LDY #$0 
2004 =INY 

2005 CPY #$0A 
2007 BNE $2004 
2009 CPX #$32 
200B BCS $2002 
GET 


Every computer must have that important “‘which key 
is being pressed?” address, where it holds the value of 
a character typed in from the keyboard. To GET, you 
create a very small loop which tests this address. See a 
complete description of this technique under CONT 
above. 


GOSUB 

This is nearly identical to the command GOSUB inBA- 
SIC. Use JSR $NNNN and you will go to a subroutine at 
address NNNN instead of a line number as in BASIC. 


(NNNN just means that you can substitute any hex 
number for the NNNN that you want to. This is a form 
of math shorthand.) 

Parameters are the number or numbers handed to 
a subroutine to give it information it needs. Quite 
often, BASIC subroutines work with the variables al- 
ready established within the BASIC program. In ML, 
though, managing variables is up to you. Subroutines 
are useful because they can perform tasks repeatedly 
without needing to be written into the body of the pro- 
gram each time the task is to be carried out. Beyond 
this, they can be generalized so that a single subroutine 
can act in a variety of ways, depending upon the vari- 
able (the parameter) which is passed to it. 

A delay loop to slow up a program could be gener- 
al in the sense that the amount of delay is handed to 
the subroutine each time. The delay can, in this way, be 
of differing durations, depending on what it gets as a 
parameter from the main routine. 

Let’s say that we've decided to use address $40 to 
pass parameters to subroutines, We could pass a delay 
of five cycles of the loop by: 


2000 LDA #$5 
The Main Program 2002 STA $40 
2004 JSR $5000 
5000 DEC $40 
5002 BEQ $500C If address $40 has 
counted all the 
way down from 5 
to 0, RTS back to 
the main program, 
5004 LDY #$0 
5006 DEY 
The Subroutine 5007 BNE $5006 
5009 JMP $5000 
500C RTS 


A delay which lasted twice as long as the above 
would merely require a single change to the calling 
routine: 2000 LDA #$0A. 


GOTO 

In ML, you use the JMP instruction. JMP is like JSR, ex- 
cept the address you leap away from is not saved any- 
where. You jump, but cannot use an RTS to find your 
way back. 

There are two basic kinds of branching in comput- 
ing. A conditional branch would be CMP #0;:BEQ 5000. 
The condition of equality is tested by BEQ, Branch if 
EQual. BNE tests a condition of inequality, Branch if 
Not Equal. Likewise, BCC (Branch if Carry is Clear) 
and the rest of these branches are testing conditions 
within the program. 

GOTO and JMP do not depend on any conditions 
within the program, so they are unconditional 
branches. The question arises when you use a GOTO: 
Why did you write a part of your program that you 
must always (unconditionally) jump over? GOTO and 
JMP are sometimes used to patch up a program, but 
used without restraint, they can make your program 
hard to understand later. On the other hand, JMP can 
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many times be the best solution to a programming 
problem. In fact, it is hard to imagine ML programming 
without it. 

One additional note about JMP: It makes a pro- 
gram nonrelocatable. If you later want to move your 
whole ML program to a different part of memory, all 
the JMPs (and JSRs) need to be checked to be sure they 
aren’t pointing to addresses which are no longer cor- 
rect. (IMP or JSR into your BASIC ROMs will still be 
the same, but not those which are targeted to addresses 
within the ML program.) 


2000 JMP $2005 5 
2003 LDY #$3 
2005 LDA #$5 


If you moved this little program up to $5000, ev- 
erything would survive intact and work correctly ex- 
cept the JMP $2005. It would still say to jump to $2005, 
but it should say to jump to $5005, after the move. You 
have to go through with a disassembly and check for 
all these incorrect JMPs. To make your programs more 
“relocatable,” you can use a special trick with uncondi- 
tional branching which will move without needing to 
be fixed: 


2000 LDY #50 

2002 BEQ $2005 Since we just loaded Y with a 
zero, this Branch if EQual to 
zero instruction will always be 
true and cause a pseudo-JMP. 

2004. NOP 

2005 LDA #85 


Your monitor includes a “moveit” routine, in- 
voked with T (Transfer), which will take an ML pro- 
gram and relocate it somewhere else in memory for 
you. You can go into the monitor and type T 2000 2006 
5000 (you give the monitor these numbers in hex). The 
third number is the target address, The first and second 
are the start and end of the program you want to move. 

The best solution to relocatability, however, is an 
assembler like LADS. (Editor's note: LADS is a label- 
based assembler included with 128 Machine Language 
For Beginners.) With it, you never JMP to actual ad- 
dresses; rather, you JMP or JSR or branch to labels. This 
way, relocating your program couldn’t be simpler. You 
just change the start address with *= and reassemble. 
Everything is taken care of and the program reassem- 
bles to the new location flawlessly. With LADS, the ex- 
ample above is written like this: 

100 JMP NEXTROUTINE 
110 LDY #3 
120 NEXTROUTINE LDA #5 

(The numbers at the left are not addresses; they 
are line numbers for your convenience when writing 
the program, and they have no effect on the resulting 
ML code after assembly.) 


IF-THEN 

This familiar and fundamental computing structure is 
accomplished in ML by combining the CMP instruc- 
tion with BNE or any other conditional branch: BEQ, 
BCC, and so forth. Sometimes, the IF half isn’t even 
necessary. Here’s how it would look: 

2000 LDA $57 What's in address $57? 

2002 CMP #S0F Is it $OF, 15 decimal? 
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2004. BEQ $200D IF it is, branch up to $200D. 

2006 LDA #$0A Or ELSE, put a $0A, 10 decimal, 
into address $57. 

2008 STA $57 

200A JMP $2011 And jump over the THEN part. 

200D LDA #$14 THEN, put a $14, 20 decimal, into 
address $57. 

200F STA $57 

2011 Continue with the program.... 


Often, though, your flags are already set by an ac- 
tion, making the CMP unnecessary. For example, if 
you want to branch to $200D if the number in address 
$57 is zero, just LDA $57:BEQ $200D. This works be- 
cause the act of loading the accumulator will affect the 
status register flags. You don’t need to. CMP #0 be- 
cause the zero flag will be set if a zero was just loaded 
into the accumulator. It won't hurt anything to use a 
CMP, but you'll find many cases in ML programming 
where you can shorten and simplify your coding if you 
wish to. As you gain experience, you will see these pat- 
terns and learn what affects the status register flags. 


INPUT 

This is a series of GETs, echoed to the screen as they 
are typed in, which end when the typist hits the RE- 
TURN key. The reason for the echo (the symbol for 
each key typed is reproduced on the screen) is that few 
people enjoy typing without seeing what they’ve 
typed. This also allows for error correction using cursor 
control keys or DELETE and INSERT keys. To handle 
all of these actions, an INPUT routine must be fairly 
complicated. We don’t want, for example, the DELETE 
to become a character within the string. We want it to 
act immediately on the string being entered during the 
INPUT, to erase a mistake. 


Our INPUT routine must also be smart enough to 
know what to add to the string and what keys are in- 
tended only to modify it. Here is the basis for con- 
structing your own ML INPUT. It simply receives a 
character from the keyboard, prints it to the screen, and 
ends when the RETURN key is pressed. We'll write 
this INPUT as a subroutine. That simply means that 
when the 13 (ASCII for carriage return) is encountered, 
we'll perform an RTS back to a point just following the 
main program address which JSRed to our INPUT rou- 
tine. Let’s do it in the LADS source code format, with 
line numbers instead of addresses: 


10 *= $B00 

20.S 

30.0 

40 LOOP JSR $FFE4:BEQ LOOP; If we got a zero, no 
key had been pressed. 


50 JSR $FFD2; Print the character to 
the screen. 

60 CMP #13; Is it a carriage return? 

70 BNE LOOP; If not, return for more 
keypresses, 

80 RTS; Otherwise return to the 


calling routine. 


If you try this out, you'll notice that even the cur- 
sor keys and delete, screen clear, and so forth, work 
correctly. This is because when you JSR $FFD2 
(PRINT), it is just as if you printed any character from 
BASIC (with cursor control codes embedded in a 











string). However, if we wished, we could make this IN- 
PUT routine much more complex. As it stands, it will 
hold the string on the screen only. To save the string, 
you would need to store it in some buffer of yours in 
addition to its appearing on the screen. Nonetheless, if 
you're going to store the string into some safe location 
where you are keeping string variables, you'll need to 
refuse to store such things as the delete character or 
your stored string will be corrupted because it will in- 
clude that delete. Or you might want to prevent the 
user from hitting a key like carriage return. In that case, 
just CMP #13:BEQ LOOP so that nothing is echoed to 
the screen or stored in your string when the user tries to 
enter that particular key. 

The great freedom you have with ML is that you 
can redefine anything you want. You can softkey: de- 
fine a key’s meaning via software (have any key per- 
form any task you want). You might even decide to use 
the $ key to DELETE. 

Along with this freedom goes the responsibility 
for organizing, writing, and debugging these routines. 


LET 

Although this word is still available on most BASICs, it 
is a holdover from the early days of computing. It is 
supposed to remind you that statements like LET 
NAME = NAME + 4 is an assignment of a value to a 
variable, not an algebraic equation. The two numbers 
on either side of the equal sign, in BASIC, are not in- 
tended to be equal in the algebraic sense. Most people 
write NAME = NAME + 4 without using LET. The 
function of LET applies, though, to ML as well as to 
BASIC: Values must be assigned to variables. 

In the 128, for example, where the RAM bank can 
change depending on how you configure the com- 
puter, there has to be a place where we can find out 
which bank is the current bank. Address $FF00 holds 
this information. 

Likewise, a program will sometimes require that 
you assign meanings to string variables, counters, and 
the like. This can be part of the initialization process, 
the tasks performed before the real program, your 
main routine, gets started. Or it can happen during the 
execution of the main loop. In either case, there has to 
be an ML way to establish, to assign, variables. This 
also means that you must have zones of memory set 
aside to hold these variables unless, like the bank- 
switching location, the computer has already defined a 
variable’s address. Normally, you will store your vari- 
ables as a group at the end of an ML program. 

For strings, you can think of LET as the establish- 
ment of a location in memory. In our INPUT example 
above, we might have included an instruction which 
would have sent the characters from the keyboard to a 
table of strings as well as echoing them to the screen. If 
so, there would have to be a way of managing these 
strings, 

In general, you will probably find that you pro- 
gram in ML using somewhat fewer variables than in 
BASIC, There are three reasons for this: 


1. You will probably not write many programs in 
ML like databases where you manipulate hundreds of 
names, addresses, and so forth. It might be somewhat 
inefficient to create an entire database management 


program, an inventory program for example, in ML. 
Keeping track of the variables would require careful 
programming. 

The value of ML is its speed of execution, but its 
drawback is that it requires more precise programming 
and, at least for beginners, can take more time to write. 
So, for an inventory program, you could write the bulk 
of the program in BASIC and simply attach ML rou- 
tines for sorting and searching tasks within the program 
where high speeds are desirable. 

2. The variables in ML are often handled within a 
series of instructions (not held elsewhere as BASIC 
variables are). FOR I = 1 TO 10 : NEXT I becomes, in 
ML, LDY #1:INY:CPY #10:BNE. 

Here, the BASIC variable is counted for you and 
stored outside the body of the program, The ML “vari- 
able,” though, is counted by the program itself. ML has 
no interpreter which handles such things. If you want a 
loop, you must construct all of its components yourself. 

3. In BASIC, it is tempting to assign values to vari- 
ables at the start of the program and then to refer to 
them later by their variable names, as in 10 BALL = 
79. Then, anytime you want to PRINT the BALL to the 
screen, you could say, PRINT CHR$(BALL). Alterna- 
tively, you might define it this way in BASIC: 10 
BALL$ = “O”. In either case, your program will later 
refer to the word BALL. In this example we are assum- 
ing that the number 207 will place a ball character on 
your screen (the letter O). 


In ML we can use variable names precisely the 
same way if we are programming with an advanced as- 
sembler like LADS. However, with an elementary as- 
sembler, you will just LDA #207, STA (screen position) 
each time. Some people like to put the 207 into their 
zone of variables (that arbitrary area of memory set up 
at the end of a program to hold tables, counters, and 
important addresses). They can pull it out of that zone 
whenever it’s needed. That is somewhat cumbersome, 
though, and slower. You would LDA 1015, STA 
(screen position), assuming you had put a 207 into this 
“ball” address, 1015, earlier. 

Obviously, a value like BALL will always remain 
the same throughout a program. The ball will look like 
a ball in your game, whatever else happens. So, it’s not 
a true variable; it does not vary. It is constant. A true 
variable must be located in your “zone of variables,” 
your variable table. 

It cannot be part of the body of your program itself 
(as in LDA #207) because it will change. You don’t 
know when writing your program what the variable 
will be. So you can’t use immediate mode addressing be- 
cause it might not be a #207. You have to LDA 1015 
from within your table of variables, 

Elsewhere in the program you'll have pro- 
grammed one or more STA 1015 or INC 1015 instruc- 
tion, or some other manipulation of this address, which 
keeps updating this variable. In effect, ML makes you 
responsible for setting aside areas which are safe to 
hold variables if you are using the monitor assembler. 
What's more, you have to remember the addresses and 
update the variables in those addresses whenever nec- 
essary. This is why it is so useful to keep a piece of pa- 
per next to you when you are writing ML using the 
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monitor. The paper lists the start and end addresses of 
the zone of variables, the table. You write down the 
specific address of each variable as you write your 


program. 
LIST 


This is done via a disassembler. It will not have line 
numbers (though, again, advanced assembler packages 
like LADS do allow line numbers). You will see the ad- 
dress of each instruction in memory. You can look over 
your work and plan debugging strategies, where to set 
BRKs into problem areas, and so on. The most common 
way to list and check your work, however, is to read 
over the source code. This does not require a disas- 
sembler, You write LADS source code as if it were a 
BASIC program and, thus, can LIST it and modify it as 
if it were a BASIC program. There is a subtle difference 
between studying source code and studying object 
code (via disassembly). The former is most useful for 
making modifications and for locating the more obvi- 
ous bugs. The latter is useful when you need to patient- 
ly track down those last few stubborn bugs that no 
amount of reading over the source code seems to 
uncover, 


LOAD 

The method of saving and loading an ML program var- 
ies from computer to computer. You have two options: 
loading from within the monitor or from BASIC, When 
you finish working on a program, or a piece of a pro- 
gram, on the mini-assembler, you will know the start- 
ing and ending addresses of your work, Using these, 
you can save to disk or tape using the S monitor com- 
mand (see SAVE below). To load, the simplest way is 
just to L “FILENAME”,1 (for tape) or ,8 (for disk). You 
can also load ML when you're in BASIC mode by 
BLOAD, With both the monitor’s L and BASIC’s 
BLOAD commands, you can reassign your ML routine 
to a different target address (see your manual). How- 
ever, this will not adjust the JSRs, and so on, so you 
haven't really relocated the program, and it probably 
would not run at the new location. To truly relocate it, 
you need to change the start address *= and reassem- 
ble it with LADS, However, loading in a version of 
your ML program to a different location with the L 
command and then loading in another version in its 
normal location does allow you to compare them with 
the monitor’s C command. 


NEW 

In Microsoft BASIC, this has the effect of resetting 
some pointers which make the machine think that you 
are going to start over again. The next program line you 
type in will be put at the “‘start-of-a-BASIC-program” 
area of memory. Some computers, the Atari for ex- 
ample, even wash memory by filling it with zeros, 
There is no special command in ML for NEWing an 
area of memory, though the monitor has a “fill memo- 
ty” option which will fill an area of memory as large as 
you want with whatever value you choose. 

The reason that NEW is not found in ML is that 
you do not always write your programs in the same 
area of memory as you do in BASIC, building up from 
some predictable address. You might have a subrou- 
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tine floating up in high memory, another way down 
low, your table of variables at the end, and your main 
program in the middle, Or you might not. We've been 
using $2000 as our starting address for many of the ex- 
amples in this book and $5000 for subroutines, but this 
is entirely arbitrary. 

To “NEW” in ML, just start assembling over the 
old program. 

Alternatively, you could just turn the power off 
and then back on again. This would, however, have 
the disadvantage of wiping out your assembler along 
with your program. 


ON-GOSUB 
In BASIC, you are expecting to test values from among 
a group of numbers: 1, 2, 3, 4,5, .... The value of X must 
fall within this narrow range: ON X GOSUB 100, 200, 
300, ... (X must be 1 or 2 or 3 here), In other words, you 
could not conveniently test for widely separated values 
of X (18, 55, 220). 

Using CMP, you can perform a multiple 
branch test: 


2000 LDA $96 Get a value, perhaps input from 
the keyboard. 

2002 CMP #$50 Decimal 80 

2004 BNE $2009 

2006 JSR $5000 Where you would print “hot,” 
following our example of CASE. 

2009 CMP #$§64 Decimal 100 

200B BNE $2011 

200D JSR $5020 Print “very hot” 

2010 CMP #$78 Decimal 120 

2012 BNE $2017 

2014 JSR $5030 Print “intolerable” 


This illustrates one way that bugs get into ML—by 
not cleanly entering and leaving subroutines. The po- 
tential problem here is triggering the CMPs more than 
once, Since you are JSRing and then will be RTSing 
back to within the multiple branch test above, you will 
have to be sure that the subroutines up at $5000 do not 
change the value of the accumulator. If the accumula- 
tor started out with a value of $50 and, somehow, the 
subroutine at $5000 left a $64 in the accumulator, you 
would print “hot” and then also print “very hot.” One 
way around this would be to put a zero into the accu- 
mulator before returning from each of the subroutines 
(LDA #$0). This assumes that none of your tests, none 
of your cases, responds to a zero, 


ON-GOTO 

This is more common in ML than the ON-GOSUB 
structure above. It eliminates the need to worry about 
what is in the accumulator when you return from the 
subroutines. Instead of RTSing back, you jump back, 
following all the branch tests. 


2000 LDA $96 

2002 CMP #$50 

2004 BNE $2009 

2006 ~JMP $5000 Print “hot’’ 

2009 CMP #$64 

200B BNE $2010 

200D JMP $5020 Print “very hot’ 
2010 CMP #$78 

2012 BNE $2017 

2014 JMP $5030 Print “intolerable” 








2017 All the subroutines JMP $2017 


when they finish. 


Instead of RTS, each of the subroutines will JMP 
back to $2017, which lets the program continue with- 
out accidentally “triggering” one of the other tests with 
something left in the accumulator during the execution 
of one of the subroutines. 


PRINT 
You could print out a message in the following way: 


2000 LDY #§0 

2002 LDA #72 The letter H 

2004 STA $0400,Y An address on the screen 
2007 ~INY 
2008 LDA 
200A STA 
200D INY 
200E LDA 
2010 STA 
2013 ~INY 
2014 LDA 
2016 «=STA 
2019 INY 
201A LDA #79 
201C STA $0400,Y 


But this is clearly a clumsy, memory-hungry way 
to go about it. In fact, it would be absurd to print out a 
long message in this fashion, The most common ML 
method involves putting message strings into a data ta- 
ble and ending each message with a zero. Zero is never 
a printing character in computers; to print the number 
zero, you use 176: LDA #$30, STA $0400. So, true zero 
(not the code for the character 0) can be used as a de- 
limiter (a signal that something has ended) to let the 
printing routine know that you've finished the mes- 
sage. In a data table, we first put in the message 
“hello”: 
1000 $48 H 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 


#69 
$0400,Y 


#76 
$0400,Y 


The letter E 
The letter L 


#76 The letter L 


$0400,Y 
The letter O 


E 
L 
L 
$4F O 
The delimiter 
H 
I Another message 
Another delimiter 
Such a message table can be as long as you need; it 
holds all your messages and they can be used again 
and again: 
2000 LDY #$§0 


2002 LDA $1000,Y 

2005 BEQ $200F If the zero flag is set, it must mean 
that we've reached the delimiter, 
so we branch out of this printing 
routine. 

2007 STA $0400,Y Put it on the screen. 

200A INY 

200B JMP $2002 Go back and get the next letter in 
the message. 

200F Continue with the program, 


Had we wanted to print HI, the only change nec- 
essary would have been to put $1006 into the LDA at 
address $2003. To change the location on the screen 
that the message starts printing, we could just put some 
other address into $2008. The message table, then, is 


just a mass of words, separated by zeros, in RAM 
memory. 

The fastest way to print to the screen, especially if 
your program will be doing a lot of printing, is to create 
a subroutine which will print any of your messages. It 
can use some bytes in zero page (addresses 0-255) to 
hole the location of the message within your table of 

lata. 

To put an address into zero page, you will need to 
put it into two bytes. Addresses are too big to fit into 
one byte. With LADS, you can use the #< and #> 
pseudo-ops to extract the LSB and MSB of a label and 
thus store the address of your message into a zero page 
pointer: 

10 MSGADDRESS = 56 
20 SCREEN = $0400 
100 LDA #<MESSAGE:STA MSGADDRESS; set up 
pointer 
110 LDA #>MESSAGE:STA MSGADDRESS+1 
120 JSR PRINTMSG; go to universal print subroutine 
500 PRINTMSG LDY #0:LOOP LDA 
(MSGADDRESS),Y:BEQ END:STA SCREEN, Y 
510 STA SCREEN, Y:INY:JMP LOOP 
520 END RTS 


First, you split the hex number in two. The left two 
digits, $10, are the MSB (most significant byte) and the 
right digits, $00, make up the LSB (least significant 
byte). If you are going to put this target address into 
zero page at 56 (decimal): 

2000 LDA #$§00 LSB 

2002 = STA 
2004 LDA 
2006 =STA 
2008 JSR 

5000 LDY 
5002. LDA 
5004 BEQ 
5006 STA 
5009 INY 
500A JMP 
500D RTS 

One drawback to this PRINT subroutine we've 
constructed is that it will always print any messages to 
the same place on the screen. That $0400 is frozen into 
your subroutine, Solution? Use another zero page pair 
of bytes to hold the screen address, Then, your calling 
routine sets up the message address as above, but also 
goes on to specify a screen address as well. 

The 128’s screen, in 40-column mode, starts at 
$0400 (1024 decimal), so you will want to put 0 and 4 
into the LSB and MSB respectively for your screen 
pointer. 


MSB 


Printout subroutine 


If zero, return from subroutine.., 
$0400,Y to screen, 


$5002 





2000 LDA #$00 LSB 

2002 STA $56 Set up message address 

2004 LDA #$10 MSB 

2006 STA $57 

2008 LDA #$0 LSB 

200A STA $58 We'll just use the next two bytes in 
zero page above our message 
address for the screen address. 

200C LDA #$4 MSB 

200E STA $59 

2010 JSR $5000 

5000 LDY #$§0 

5002 LDA ($56)Y 
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5004 BEQ $500D If zero, return from subroutine... 
5006 STA ($58),Y to screen. 

5009 INY 

500A JMP $5002 

500D RTS 


The easiest way to print messages to particular 
places on the screen, however, is to use the 128’s built- 
in BASIC PRINT routine to send the characters, one by 
one, each to the next cursor position onscreen. The 
built-in routine updates and keeps track of the current 
cursor position for you. So, you can get around having 
to keep a screen pointer in zero page this way. In the 
example immediately above, just replace line 5006 
with JSR $FFD2 (the 128’s PRINT routine) and remove 
lines 2008-200E. 


READ 

There is no reason for a reading of data in ML. Vari- 
ables are not placed into “DATA statements.” They are 
entered into a table when you are programming. The 
purpose of READ, in BASIC, is to assign variable 
names to raw data, or to take a group of data and move 
it somewhere, or to manipulate it into an array of vari- 
ables. These things are handled by you, not by the 
computer, in ML programming. 

If you need to access a piece of information, you set 
up the addresses of the datum and the target address to 
which you are moving it. As always, in ML you are ex- 
pected to keep track of the locations of your variables. 
This pad of paper is always next to you as you program 
in ML. It would seem that you would need many notes, 
but in practice an average program of, say, 1000 bytes 
could be mapped out and commented on, using only 
one sheet. 

Alternatively, with more sophisticated assemblers 
like LADS, the labels themselves within the program 
will keep track of things for you, and embedded com- 
mente serve to remind you of the use and function of 
all data. 


REM 

You do this on a pad of paper, too, when working with 
a simple assembler. If you want to comment or make 
notes about your program (and it can be a necessary, 
valuable explanation of what's going on), you can dis- 
assemble some ML code like a BASIC listing. If you 
have a printer, you can make notes on the printed dis- 
assembly. If you don’t use a printer, make notes on 
your pad to explain the purpose of each subroutine, the 
parameters it expects to get, and the results or changes 
it effects, 

The more sophisticated assemblers like LADS will 
permit comments within the source code. As you pro- 
gram, you can include REMarks by typing a semicolon, 
which is a signal to the assembler to ignore the RE- 
Marks when it is assembling your program. In these as- 
semblers, you are working much closer to the way you 
work in BASIC, Your REMarks remain part of the 
source program, and can be listed out and studied. 


RETURN 

RTS works the sarhe way that RETURN does in BASIC: 
It takes you back to just after the JSR (GOSUB) that sent 
control of the program away from the main program 
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and into a subroutine. JSR pushes, onto the stack, the 
address which immediately follows the JSR itself. That 
address, then, sits on the stack, waiting until the next 
RTS is encountered. When an RTS occurs, the address 
is pulled from the stack and placed into the program 
counter. This has the effect of transferring program 
control back to the instruction just after the JSR. 


RUN 

There are several ways to start an ML program. If you 
are taking off into ML from BASIC, you just SYS to it 
by giving its address (in decimal) as the argument of 
the SYS. This acts just like JSR and will return control 
to BASIC, just as RETURN would, when there is an un- 
matched RTS in the ML program. By unmatched, we 
mean the first RTS which is not part of a JSR/RTS pair. 
SYS can take you into ML either in immediate mode (di- 
rectly from the keyboard) or from within a BASIC pro- 
gram as one of the BASIC commands. 

If you need to “pass” information from BASIC to 
ML, it is easiest to use integer numbers and just POKE 
them into some predetermined ML variable zone that 
you've set aside and noted on your notepad. Then just 
SYS to your ML routine, which will look into the set- 
aside, POKEd area when it needs the values from 
BASIC. 

If you are not going between BASIC and ML, you 
can start (RUN) your ML program from within the 
built-in monitor. To enter the monitor, press f8. To run 
an ML program from within the monitor, type G 2000 
(that’s address 8192 in decimal; this presumes that 
you've either loaded in your ML program at that ad- 
dress or have just assembled one there). 

The 128 expects to encounter a BRK instruction to 
end the run and return control to the monitor, 


SAVE 

When you save a BASIC program, the computer auto- 
matically handles it. The starting address and the end- 
ing address of your program are calculated for you. In 
ML, you must know the start and end addresses. From 
the monitor, you type S, then the name of your pro- 
gram, then 8 for disk or 1 for tape, the starting address, 
and the ending address, All these items are separated 
by commas: 

S “FILENAME”,8,2000,2010 


(Note that these addresses are in hex. The addresses 
are 8192 and 8208, in decimal, but you must use hex 
from the monitor unless you specify otherwise, For 
more information about BSAVE and BLOAD, the ML 
save and load routines in BASIC, please see your User's 
Guide.) 


STOP 

BRK (or an RTS with no preceding JSR) throws you 
back into the monitor mode after running an ML pro- 
gram. BRK is most often used for debugging programs 
because you can set “breakpoints” in the same way 
that you would use STOP to examine variables when 
debugging a BASIC program. 


SYS 
This is BASIC’s way of using a piece of ML code, an ML 








routine, as a subroutine. The only difference between 
SYS and GOSUB is that the computer is alerted to the 
fact that it needs to switch mental gears: The next series 
of instructions will be ML, In other words, the com- 
puter shouldn’t try to interpret what it finds at the SYS 
address as more BASIC instructions. Later, when it 
comes upon an RTS instruction in the ML program 
which was not matched by a previous JSR instruction, 
it will then revert to the BASIC program and pick up 
where it left off, following the SYS instruction. 

There are times when you want to write in ML and 
use it as a subroutine for a BASIC program. This can 
greatly speed up the execution of the BASIC program. 
To put an ML program in RAM where it will be safe 
from BASIC’s dynamic variable storage (where it won't 
be overwritten by BASIC), you lower the “‘top-of- 
memory” pointer ($39,3A) to create some space in high 
RAM of which the computer is “unaware.” This point- 
er contains the address (in the usual LSB,MSB format 
discussed earlier) beyond which BASIC is forbidden to 
intrude. If you're going to use only one page of memo- 
ry (256 bytes), just DEC #3A which has the effect of 
making it point 256 bytes lower than it normally 
would. This pointer affects bank 1. 

After resetting this pointer, you are free to load in 
your ML program into the now-safe RAM between 
where the pointer points and the true highest RAM 
byte in your computer. 

Short ML routines can always be stored in the 
page between $B00 and $BFF without any special 
preliminaries. 


String Handling 


ASC 

In BASIC, this will give you the number of the ASCII 
code which stands for the character you are testing. 
2ASC(A”) will result in a 65 being displayed. There is 
never any need for this in ML. If you are manipulating 
the character A in ML, you are using ASCII already. In 
other words, the letter A is 65 in ML programming. The 
Commodore ASCII code isn’t standard ASCII; it stores 
character symbols in some nonstandard ways, so you 
will need to write a special program to be able to trans- 
late to standard ASCII if you are using a modem or 
some other peripheral which uses true ASCII. 


CHR$ 

This is most useful in BASIC to let you use characters 
which cannot be represented within normal strings, 
will not show up on your screen, or cannot be typed 
from the keyboard. 

For example, if you have a printer attached to your 
computer, you could send CHR$(13) to it, and it would 
perform a carriage return. The correct numbers which 
accomplish various things sometimes differ, though 
decimal 13—an ASCII code standard—is nearly uni- 
versally recognized as carriage return, and the 128 uses 
this convention, too. 

Or, you could send the combination CHR$(27) 
CHR§(8), and the printer would backspace. 

There is no real use for CHR$ within ML. If you 
want to specify a carriage return, just LDA #13. In ML, 
you are not limited to the character values which can 


appear onscreen or within strings. Any value can be 
dealt with directly. 


LEFT$ 

As usual in ML, you are in charge of manipulating data. 
Here's one way to extract a certain “substring” from 
the left side of a string as in the BASIC statement 
LEFT$(X$,5): 


2000 LDY #$5 

2002 LDX #$0 Use X as the offset for buffer 
storage, 

2004 =LDA $1000,Y The location of X$. 

2007 STA $4000,X The “buffer,” or temporary 
storage area, for the substring. 

200A INX 

200B DEY 

200C BNE $2004 

LEN 


In some cases, you will already know the length of a 
string in ML. One of the ways to store and manipulate 
strings is to know beforehand the length and address of 
a string. Then you could use the subroutine given for 
LEFT$, above. More commonly, though, you will store 
your strings with delimiters (zeros) at the end of each 
string. To find out the length of a certain string: 

2000 LDY #§0 
2002 LDA $1000,Y 


$2009 


The address of the string you are 
testing. 

Remember, if you LDA a zero, 
the zero flag is set. So you don’t 
really need to use a CMP #0 here 
to test whether you've loaded the 
zero delimiter. 


2003 BEQ 


2005 
2006 


INY 
BNE $2002 We are not using a JMP here be- 
cause we assume that all your 
strings are less than 256 charac- 
ters long. 

If we still haven't found a zero 
after 256 INYs, we avoid an end- 
less loop by just BRKing out of 
the subroutine. 

The LENgth of the string is now 


in the Y register. 

We had to DEY at the end because the final INY 
picked up the zero delimiter. So, the true count of the 
LENgth of the string is one less than Y shows, and we 
must DEY one time to make this adjustment. 


MID$ 
To extract a substring which starts at the fourth charac- 
ter from within the string and is five characters long— 
MID$(X$,4,5): 

2000 LDY #$5 


2008 BRK 


2009 DEY 


The size of the substring we're 


after. 

2002 LDX #$§0 X is the offset for storing the 
substring. 

2004 LDA $1003,Y To start at the fourth character 


from within the X$ located at 
$1000, simply add three to that 
address. Instead of starting our 
LDA.Y at $1000, skip to $1003. 
This is because the first character 
is not in position 1. Rather, it is 
at the zeroth position, at $1000. 
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2007 STA $4000,X The temporary’ buffer to hold the 
substring. 

200A INX 

200B DEY 

200C BNE $2004 

RIGHT$ 


This, too, is complicated because normally we do not 
know the LENgth of a given string. To find RIGHT$ 
(X$,5) if X$ starts at $1000, we should find the LEN first 
and then move the substring to our holding zone (buff- 
er) at $4000: 


2000 LDY #$0 

2002 LDX #$0 

2004 LDA $1000,Y 

2007 BEQ $200D The delimiting zero is found. 

2009 INY 

200A JMP $2004 

200D TYA Put LEN into A so that we can 
subtract the substring size from it. 

200E SEC Always set carry before any 
subtraction, 

200F SBC #$§5 Subtract the size of the substring 
you want to extract. 

2011 TAY Put the offset back into Y, now 
adjusted to point to five charac- 
ters from the end of X$. 

2012. LDA $1000,Y 

2015 BEQ $201E We found the delimiter, so end. 

2017 STA $4000,X 

201A INX 

201B DEY 

201C BNE $2012 

201E RTS 

TAB 


This formatting instruction moves you to a specified 
column on a given line. TAB 10 moves you ten spaces 
from the left side of the screen. 

In ML, you have more direct control over what 
happens: You would just add or subtract the amount 
you want to TAB over to. If you were printing to the 
screen and wanted ten spaces between A and B so it 
looked like 


A B 

you could write: 

2000 LDA #$41 A 

2002 STA $0400 Screen RAM address 

2005 LDA #$42 B 

2007 STA $040A You've added ten to the target 


address. 


Alternatively, you could add ten to the Y offset 

(this is LADS format): 
10 SCREEN = $0400 
100 LDY #0:LDA #“A:STA SCREEN,Y:LDY #10:LDA 
#B:STA SCREEN,Y 

As an example, we are writing to the screen here, 
but in practice, you would print to the screen using 
$FFD2 as described below. The examples above, using 
Y as an offset, are more applicable to storing, say, items 
in a database or printing hardcopy. 

Nonetheless, if you are printing out many col- 
umns of numbers and need a subroutine to space your 
printout correctly, you might want to use a subroutine 
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which will add ten to the Y offset each time you call the 
subroutine: 


5000 TYA 
5001 CLC 
5002 ADC #10 
5004 TAY 
5005 RTS 


This subroutine directly adds ten to the Y register 
whenever you JSR $5000. However, it’s more typical to 
rely on $FFD2 for screen printing since it will keep 
track of the cursor position for you. Just LDA with 
whatever character you want printed and then JSR 
$FFD2, and it will be printed at the next available 
space. 

You can see that moving over ten spaces could be 
accomplished by LDA #32:JSR $FFD2 performed ten 
times. The 32 is the blank character. However, here, 
too, there is a more practical method. 

Anything you can print from BASIC you can print 
from ML, So, all the cursor control characters can be 
printed—CLR screen, backspace, anything. Most con- 
trol characters can be entered into LADS directly by 
typing #“c where c is the control code you desire: 
5000 LDA #%c 
5001 JSR  $FFD2 

Alternatively, you can put the actual Commodore 
ASCII value into the accumulator prior to JSR $FFD2. 
One way to find out the ASCII value to, for example, 
clear the screen, would be to go to BASIC and type 
CHRS(‘" ”) to get it. @ 


A REAL 


Pascal 
for the 
C128! 


Pascal 128 is a full ISO implementation. Now you can 
write programs at home that run on mainframes at 
school or the office. And, Kyan has the power and 
features needed to develop state-of-the-art software, 

Pascal 128 includes a Full Screen Text Editor, Native 
Code Compiler, Macro Assembler, 300 page Tutorial 
Manual, and more! 


Kyan Pascal 128 is a bargain at $69.95! 


Order yours today! See what a real Pascal compiler 
can do on your C128! 


415-626-2080 


Send Check/Money Order to: 
Kyan Software, Inc. Dept. 3 
1850 Union Street #183 
San Francisco, CA 94123 











Please enclose $4.50 for shipping; $15.00 outside North 
America; Calif. residents add 6.5% sales tax. 

All Kyan products come with a 30 day money back guarantee. 
Kyan Pascal is also available for the C64. 






























‘How To Type In 
COMPUT. EV’s GAZETTE Programs 


This can be entered’ on the Com- 
modore 64 by pressing the CTRL 
key while typing the letter in 
braces. For example, {A} means to 
press CTRL-A. 


Special Characters 

Most of the programs listed in each 
issue contain special control charac- 
ters. To facilitate typing in any pro- 
grams from the GAZETTE, use the 
‘following listing conventions, 

‘The most common type of con- 
trol characters in our listings appear 
fas words within braces; {DOWN} 
means to press the cursor down 
key; {5 SPACES} means to press 
the space bar five times. 

“Yo indicate that a key should 
be’ shifted (hold: down the SHIFT. 
Key while “pressing another, key); 
the character is underlined; For ex- 
Jample, Ameans hald down the 
SHIF?. key and press A, You may 
‘see strange characters on your |/ 
screen, but that’s to be expected. If 
you find a number followed’ by an’ 
underlined key enclosed’ in braces 
(for example, {8 A}), type the key 
Jas many times as indicated (in/our 
example, enter eight SHIFTed A’s), 
V/Av a key is enclosed in special 
brackets, E34, hold down’ the 
mmadore’ key (at the lower left 
‘cornet of the keyboard) and press 


Each month, COMPUTE!'s GAZETTE 
publishes programs for the Com- 
modore 128, 64, Plus/4, 16, and 
VIC-20, Each program is clearly 
marked by title and version. Be sure 
to type in the correct: version: for’ 
your machine, All 64 programs run 
on the 128 in 64’mode. Be sure to 
read the instructions in the corre- 
‘sponding article, This can save time 
and eliminate any questions which | 
ys arise after you begin typing: 
We frequently publish two 
Programs designed’ to make typing’ 
easier: The Automatic Proofreader,/ 
and MLX, designed for entering 
machine language programs: 
7 When entering a BASIC pro- 
/gram, be especially careful with 
DATA’ statements as’ they are /ex-/ 
tremely sensitive toerrors, A 
mistyped number in a DATA state~ 
ment can,-cause your machine to 
Mock up" (you'll-have no control 
Vover the computer), Ifthis happens, 
the only recourse isto turn your” 
‘computer off then back on, erasing” 
whatever was’ in memory. , 
‘gure to save a copy of your program 
(before you run/it. If your computer | the’ indicated character, 
jerashes, you can always reload the |’ Rarely, you'll see a single letter, 
amy and Ly for the error, Vol the alphabet enclosed’ in’ Bay 







































The Quote Mode 
Although you can/moye the cursor 
around the screen with the CRSR 
keys, often a programmer will want’ 
to move the cursor under program: 
control. ‘This is seen in examples” 
suchas {LEFT} and {HOME} in’ 
the program listings. The only way 
the computer can tell the difference | 
between direct and programmed 
cursor control is the quote mode. 
Once you'press the quote key/ 
you're in’ quote mode; This’ mod 
can be’contusing if you mistype < 
character and cursor left to ‘chang: 
it: You/ll/see a reverse video charac~” 
‘ter (a graphics’ symbol for cursor’| 
left). In this case, you can use the 
DELete key to back up and edit the 
line, Type another quote and you're’ 
Jou of quote mode. If things 1 really 
get/confusing, you can’ exit quote 
mode simply by pressing RETURN. 
Then just cursor up to the yyy 
BIE) and fix it, 
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Philip |, Nelson, Assistant Editor 


“The Automatic Proofreader” helps 
you type in program listings for the 
128, 64, Plus/4, 16, and VIC-20 and 
prevents nearly every kind of typing 
mistake, 

Type in the Proofreader exactly as 
listed, Since the program can’t check it- 
self, type carefully to avoid mistakes. 
Don’t omit any lines, even if they con- 
tain unfamiliar commands. After finish- 
ing, save a copy or two on disk or tape 
before running it. This is important be- 
cause the Proofreader erases the BASIC 
portion of itself when you run it, leav- 
ing only the machine language portion 
in memory. 

Next, type RUN and press RE- 
TURN. After announcing which com- 
puter it’s running on, the Proofreader 
displays the message ‘’Proofreader 
Active”. Now you're ready to type in a 
BASIC program. y 

Every time you finish typing a line 
and press RETURN, the Proofreader 
displays a two-letter checksum in the 
upper-left corner of the screen. Com- 
pare this result with the two-letter 
checksum printed to the left of the line 
in the program listing, If the letters 
match, it’s almost certain the line was 
typed correctly. If the letters don’t 
match, check for your mistake and cor- 
rect the line, 

The Proofreader ignores spaces not 
enclosed in quotes, so you can omit or 
add spaces between keywords and still 
see a matching checksum. However, 
since spaces inside quotes are almost al- 
ways significant, the Proofreader pays 
attention to them. For example, 10 
PRINT“ THIS IS BASIC” will generate 
a different checksum than 10 
PRINT’THIS ISBA SIC’. 

A common typing error is transpo- 
sition—typing two successive charac~ 
ters in the wrong order, like PIRNT 
instead of PRINT or 64378 instead of 
64738. The Proofreader is sensitive to 
the position of each character within the 
line and thus catches transposition 
errors, 

The Proofreader does riot accept 
keyword abbreviations (for example, 2 
instead of PRINT). If you prefer to use 
abbreviations, you can still check the 
line by LISTing it after typing it in, 
moving the cursor back to the line, and 











The Automatic Prone | 





pressing RETURN, LISTing the line 
substitutes the full keyword for the ab- 
breviation and allows the Proofreader 
to work properly, The same technique 
works for rechecking programs you've 
already typed in, 

If you're using the Proofreader on 
the Commodore 128, Plus/4, or 16, do 
not perform any GRAPHIC commands 
while the Proofreader is active. When 
you perform a command like GRAPH- 
IC 1, the computer moves everything at 
the start of BASIC program space—in- 
cluding the Proofreader—to another 
memory area, causing the Proofreader 
to.crash. The same thing happens if you 
run any program with a GRAPHIC 
command while the Proofreader is in 
memory. 

Though the Proofreader doesn’t 
interfere with other BASIC operations, 
it’s a good idea to disable it before run- 


ning another program. However, the | 


Proofreader is purposely difficult to dis- 
lodge: It's not affected by tape or disk 
operations, or by pressing RUN/ 
STOP- RESTORE, The simplest way to 
disable it is to turn the computer off 
then on. A gentler method is to SYS to 
the computer's built-in reset routine 
(SYS 65341 for the 128, 64738 for the 
64, 65526 for the Plus/4 and 16, and 
64802 for the VIC). These reset routines 
erase any program in memory, so be 
sure to save the program you're typing 
in before entering the SYS command, 

If you own a Commodore 64, you 
may already have wondered whether 
the Proofreader works with other pro- 
gramming utilities like “MetaBASIC.” 
The answer is generally yes, if you're 
using a 64 and activate the Proofreader 
after installing the other utility. For ex- 
ample, first load and activate Meta- 
BASIC, then load and run the 
Proofreader, 

When using the Proofreader with 
another utility, you should disable both 
programs before running a BASIC pro- 
gram. While'the Proofreader seems un- 
affected by most utilities, there’s no 
way to promise that it will work with 
any and every combination of utilities 
you might want to use. The more utili- 
ties activated, the more fragile the sys- 
tem becomes. 


The New Automatic Proofreader 


10 VECSPEEK(772)+256*PEBK(773) 
#L0=43 :HI=44 
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20 PRINT “AUTOMATIC PROOFREADE 
R POR "731P VEC=42364 THEN 
(SPACE)PRINT "C-64" 

30 IF VEC=50556 THEN PRIND 
c-20" 

4B IP VEC#35158 THEN GRAPHIC C 
LR:PRINT “PLUS/4 & 16” 

$@ IF VEC=17165 THEN LO=45sHI= 
46:GRAPHIC CLR:PRINT"128" 

60 SA=(PEEK(LO)+256*PEEK(HI)) + 
6:ADR=SA 

76 FOR Ja0 TO 166:READ BYTsPOK 
E ADR, BYT:ADR=ADR+1 zCHKSCHK 
+BY NEXT 

80 IF CHK<>20576 THEN PRINT "* 
ERROR* CHECK TYPING IN DATA 
STATEMENTS"; END 

90 FOR Js] TO 5:READ RE,LP,/ HF: 
RS=SA+RP:HB=INT(RS/256) :LB= 
RS=(256*HB) 

100 CHK=CHK+RF+LE+HP:POKE SA+L 
F,LB:POKE! SA+HE, HB:NEXT 

118 If CHK<>22054 THEN PRINT” 
*ERROR* RELOAD PROGRAM AND 
(SPACE}CHECK PINAL LINE": BN 
D 


“vr 





120 POKE SA+149,PEEK(772) : POKE 
SA+150,PEEK(773) 

130 IF VEC=17165 THEN POKE SA+ 
14,22:POKE SA+18,23:POKESA+ 
29,224 sPOKESA+139,224 

140° PRINT CHR$ (147) ;CHRS(17);" 
PROOFREADER ACTIVE":SYS SA 

158 POKE HI, PEEK(HI)+1:POKE (Pp 
EEK(LO)+256* PEBK(HI))-1,0:N 
EW 

169 DATA 120,169,73,141,4,3,16 
943,141,5,3 

170 DATA 88,96,165,20,133,167, 
165, 21,133,168, 169 

189 DATA 0,141,0,255,162,31,18 
1,199, 157,227,3 

199 DATA 262,16,248,169,19,32, 
216, 255,169,18,32 

206 DATA 210,255,160,08,132,180 
7132,176,136,230, 188 

218 DATA 200,185 ,0,2,240,46,26 
1,34, 208,8,72 

220 DATA 165,276,723, 255,133,17 
6, 104,72, 201,32,208 

230 DATA 7,165,176, 208,3,1084,2 
98,226,104,166, 180 

240 DATA 24,165,167,121,0,2,13 
3,167, 165,168,105 

256 DATA 0,133,168,202,208, 239 
7248, 202,165,167,69 

260 DATA 168,72,41,15,168,185, 
211,,3,32,210,255 

270 DATA 104,74,74,74,74,168,1 
85,211,3,32,210 

280 DATA 255,162,31,189,227,3, 
149,199,262,16,248 

298 DATA 169,146,32, 210,255, 76 
786,137,65,66,67 

308 DATA 68,69,70,71,72.74,75, 
77,88, 81,82,83,88 

316 DATA 13,2,7,167,31,32,151, 
116,117,151,128,129,167,136 


+137 @} 











MLX 


Ottis R. Cowper, Technical Editor 


“MLX” is a labor-saving utility that 
allows almost fail-safe entry of 
machine language programs, Included 
are versions for the Commodore 64 
and 128. 


‘Type in and save some copies of which- 
ever version of MLX is appropriate for 
your computer (you'll want to use it to 
enter future ML programs from COM- 
PUTE!'s GAZETTE). Program 1 is for the 
Commodore 64, and Program 2 is for 
the 128 (128 MLX can also be used to 
enter Commodore 64 ML programs for 
use in 64 mode). When you're ready to 
enter an ML program, load and run 
MLX. It asks you for a starting address 
and an ending address. These addresses 
appear in the article accompanying the 
MLX-format program listing you’re 
typing, 

If you're unfamiliar with machine 
language, the addresses (and all other 
values you enter in MLX) may appear 
strange, Instead of the usual decimal 
numbers you're accustomed to, these 
numbers are in hexadecimal—a base 16 
numbering system commonly used by 


for short—includes the numerals 0-9 
and the letters A-F, But don’t worry— 
even if you know nothing about ML or 
hex, you should have no trouble using 
MLX. 

After you enter the starting and 
ending addresses, you'll be offered the 
option of clearing the workspace. 
Choose this option if you're starting to 
enter a new listing. If you're continuing 
a listing that’s partially typed from a 
previous session, don’t choose this 
option, 

A functions menu will appear, The 
first option in the menu is ENTER 
DATA, If you're just starting to type in 
‘a program, pick this, Press the E key, 
and type the first number in the first 
line of the program listing, If you've al- 
ready typed in part of a program, type 
the line number where you left off typ- 
ing at the end of the previous session 
(be sure to load the partially completed 
program before you resume entry). In 
any case, make sure the address you en- 
ter corresponds to the address of a line 
in the listing you are entering, Other- 
‘wise, you'll be unable to enter the data 
correctly, If you pressed E by mistake, 
you can return to the command menu 
by pressing RETURN alone when 
asked for the address. (You can get back 
to the menu from most options by 
pressing RETURN with no other input.) 








ML programmers. Hexadecimal—hex | 





Machine Language Entry Program 
For Commodore 64 and 128 





Entering A Listing 
Once you're in Enter mode, MLX prints 
the address for each program line for 
you, You then type in all nine numbers 
‘on that line, beginning with the first 
two-digit number after the colon (;). 
Each line represents eight data bytes 
and a checksum, Although an MLX~- 
format listing appears similar to the 
“hex dump” listings from a machine 
language monitor program, the extra 
checksum number on the end allows 
MLX to check your typing. (Commo- 
dore 128 users can enter the data from 
an MLX listing using the built-in moni- 
tor if the rightmost column of data is 
omitted, but we recommend against it, 
It's much easier to Jet MLX do the proof- 
reading and error checking for you.) 
When you enter a line, MLX recal- 
culates the checksum from the eight 
bytes and the address and compares 
this value to the number from the ninth 
column, If the values match, you'll hear 
a bell tone, the data will be added to the 
workspace area, and the prompt for the 
next line of data will appear. But if MLX 
detects a typing error, you'll hear a low 
buzz and see an error message. The line 
will then be redisplayed for editing. 


Invalid Characters Banned 

Only a few keys are active while you're 
entering data, so you may have to un- 
learn some habits, You do not type 
Spaces between the columns; MLX 
automatically inserts these for you, You 
do not press RETURN after typing the 
last number ina line; MLX automatical- 
ly enters and checks the line after you 
type the last digit, 

Only the numerals 0-9 and the let- 
ters A-F can be typed in. If you press 
any other key (with some exceptions 
noted below), you'll hear a warning 
buzz. To simplify typing, 128 MLX re- 
defines the function keys and + and ~ 
keys on the numeric keypad so that you 
can enter data one-handed, (The 64 
version incorporates the keypad modi- 
fication from the March 1986 “Bug- 
Swatter’’ column, lines 485-487.) In 
either case, the keypad is active only 
while entering data. Addresses must be 
entered with the normal letter and 
number keys. The figures below show 
the keypad configurations for each 
version, 

MLX checks for transposed charac- 
ters. If you’re supposed to type in AO 
and instead enter 0A, MLX will catch 
your mistake. There is one error that 





64 MLX Keypad 








128 MLX Keypad 


A B c D 
(F1) | (F3) (F5), (F7) 

















can slip past MLX: Because of the 
checksum formula used, MLX won't 
notice if you accidentally type FF in 
place of 00, and vice versa, And there's 
a very slim chance that you could gar- 
ble a line and still end up with a combi- 
nation of characters that adds up to the 
proper checksum, However, these mis- 
takes should not occur if you take rea- 
sonable care while entering data. 


Editing Features 

To correct typing mistakes before fin- 
ishing a line, use the INST/DEL key to 
delete the character to the left of the 
cursor. (The cursor-left key also de- 
letes,) If you mess up a line really badly, 
press CLR/ HOME to start the line over. 
The RETURN key is also active, but 
only before any data is typed on a line. 
Pressing RETURN at this point returns 
you to the command menu. After you 
type a character of data, MLX disables 
RETURN until the cursor returns to the 
start of a line, Remember, you can press 
CLR/HOME to quickly get to a line 
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umber prompt, 

More editing features are available 
‘when correcting Tines in which’ MLX 
has detected an error. To make correc- 
tions ina line that MLX has redisplayed 
for editing, compare the line on the 
Screen with the one printed in the list- 
ing, then move the cursor to the mis- 
take and type the correct key, The 
cursor left and right keys provide the 
normal cursor controls. (The INST/, 
DEL key now works as an alternative 
cursor-left key.) You ‘cannot move left 
beyond the first character in the line. If 
you try to moye beyond the rightmost 
character, you'll reenter the line, Dur- 
ing editing, RETURN is active; pressing 
it tells MLX to recheck the line. You can 
press the CLR/HOME key to clear the 
entire line if you want to start from 
scratch, or if you want to get to a line 
number prompt to use RETURN to get 
back to the menu. 





Display Data 

The second menu choice, DISPLAY 
DATA, examines memory and shows 
the contents in the same format as the 
program listing (including the: check- 
sum), When you press D, MLX asks you 
for a starting address. Be sure that the 
starting address you give corresponds 
toa line number in the listing, Other- 
wise, the checksum display will be 
meaningless, MLX displays program: 
lines until it'reaches the end of the pro- 
gram, at which point the menu is redis- 
played. You can pause the display by 
pressing the space bar, (MLX finishes 
printing the current line before halting.) 
Press space again to restart the display. 
To break out of the display and get back 
‘to the menu before the ending address 
is reached, press RETURN. ~ 


Other Menu Options 
Two 'more menu selections let you save 
programs and load them back into the 


computer, These are SAVE FILE and | 


LOAD FILE; their operation is quite 
straightforward, When you press S or L, 
MLX asks you for the filename, You'll 
then:be asked to press either D or T to 
select disk or tape. y 

You'll notice the disk drive starting. 
and’ stopping several times during a 
load or save (save only for the 128 ver- 
sion). Don’t panic; this is normal be- 
havior, MLX opens and reads from or 
writes to the file instead of using the 
usual LOAD and SAVE commands 
(128 MLX makes use of BLOAD). Disk 
users should also note that the drive 
prefix 0: is automatically added to the 
filename (line 750 in 64 MLX), so this 
should not be included when entering 
the name. This also precludes the use of 
@ for Save-with-Replace, so remember 
to give each version you save different 
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name. The 128 version’ makes up for 
this by giving you the option ofscratch- 
ing the existing fileif you want to reuse 
a filename, 

Remember hat MLX saves the en- 
tire workspace area from’ the starting 
address ‘to the ending address, so the 
Bic ty) load may take longer than you 

expect if Oe u've entered only a 
Bet Pea ‘of data froma long list- 
ing. When saving a partially completed 


listing, make sure to note the address” 


where you stopped typing so you'll 
know where to resume entry when you 
reload, 

MLX reports the standard disk or 
tape error messages if any problems are 
detected during the'save or load. (Tape 
users should bear in:mind that Commo- 
dore computers are never able to detect 
‘errors during a save to tape.) MLX also 
has three postal load error messages: 
INCORRECT STARTING ADDRESS, 
which means the file you‘re trying to 
load does not have the starting address 
you specified when you ran MLX; 


‘LOAD ENDED » AT address, which 


means the file you're trying to load 
ends before ‘the ending address you 
‘specified when you started MLX; and 

TRUNCATED AT ENDING AD- 
DRESS, which means the file you're 
trying to load extends beyond the end- 
ing address you specified when you 
started MLX. If you see one of these 
messages and feel certain that you've 
loaded’ the right file, exit-and’ rerun 
MLX, being careful to enter the correct 
starting and ending addresses, 

The 128 version also has'’a CATA- 
LOG DISK option so you can view the 
contents of ‘the disk Bsssory, before 
saving or loading. 

The QUIT menu option has the ob- 
vious effect—it stops MLX’and enters 
BASIC, The RUN/STOP key is dis- 
abled,‘so the Q option lets you exit the 
program without turning off the com- 

ater, (Of course, RUN/STOP-RE- 

RE also’ Bets you out.) You'll be 
asked for verification; press Y to exit to 
BASIC, or any other key to return to the 
menu. After quitting, you can type 
RUN again and reenter MLX without 
losing your data, as long as you don’t 
use the clear workspace option. 


The Finished ‘Product: 

When you've finished typing all’ the 
data foran ML. program and ‘saved your 
work, you're ready to see’ the results, 
The instructions for loading and using 
the finished product vary ftom program, 
to program, Some ML programs are de~ 
signed to be loaded and run like BASIC 
programs, so’ all you need’to’ type is 
LOAD’ “filenamte’’,8’ for disk (DLOAD. 
“filename” on the 128) or LOAD “file 
name’ for tape, and then RUN. Such 











programs will usually have: a starting 
vidress of 0801 for the 64 or 1C01 for 
the 128. Other programs’ must be re- 

loaded to specific addresses with a com= 

mand such as LOAD “filename’,8,1 for 

disk (BLOAD “filename” on the 128) or 

LOAD “filename’’,1,1 for tape, then: 

started with a SYS to a particular mem- 

ory address. On the Commodore 64,- 
the most common starting address for 

such programs is 49152, which corre= 

sponds to’ MLX address C000; In either 

case, you should always refer to the ar~ 

ticle which accompanies the ML listing 

for information on loading and running 

the program. 


An Ounce Of Prevention Uy) 
By the time you finish typing inthe data 

fora long ML program, you may have 

several hours invested in the project, 

Don’t take chances—use our “Auto- 

matic Proofreader” to type the new 

MLX, and then test your copy thorough- 

ly before first using it to enter any sig- 

nificant amount of data. Make sure all 

the menu options work as they should, 

Enter fragments of the program starting 

at several different addresses, then use 

the Display option to verify that the 
data‘has been entered correctly. And be 

sure to test the Save and Load options: 

several times to ensure that you can re- 

call your work from disk or tape. Don't 

let a simple typing error in the new 

MLX cost you several “nights of ‘hard 

work, 


Program 1: MLX For Commodore 
64 


SS 16 REM VERSION 1.1: LINES 8 
38,958 MODIFIED, LINES 4 
85-487 ADDED 

EK 186 POKE 56,58:CLR:DIM INS, 

14d, A,B, A$, BS,A(7) NS 

C4=48 C6816 1C7=7 1226242 

4=254:25=255126=256327= 


DM 118 


127 

FASPEEK (45)+26*PEEK (46) 
#BS=PEEK (55) +Z6*PEEK(56 
) sH§="9123456789ABCDEF™ 
RS=CHRS (23) :L$="(LEPT)” 
28$=" ":D$=CHRS (20) 325= 
CHR$(O)sTS="(13 RIGHT)" 
8D=54272:FOR ISD TO SD 
4+233POKE 1, :NEXT: POKE 
{SPACE }sD+24, 153POKB 78 
B,52 

PRINT" (CLR) "CHRS (142) CH 
RS$(8):POKE 53288,15;POK 
E 53281,15 

PRINT TS" (RED VERVE 

{2 SPACES) ES @3 

{2 SPACES) "spc(28)" 

{2 SPACES) (OPF} {BLU} ML’ 
x It (RED) {Rvs} . 
{2 SPACES}"spc(28)" 

{12 SPACES) {BLU}™ 
PRINT"{3 DOWN] 

{3 SPACES} COMPUTE! 'S MA’ 
CHINE LANGUAGE EDITOR 


co 126 
SB 138 


cQ 146 


158 


EJ 168 


178 


_ {3 Down)" 
3B 180 PRINT" {BLK}STARTING ADD 








19) 
88 
PG. i 
B 228 


0 230 


248 


258 


Hk 268 
j 279 


Ed 288. 


EM 298 
(Ik 388. 


OKE 318 


328 
5A 330 


GX 340 
yes 350 


S5E49";sGOSUB300:SA=A. |” 


}OSUB1040s1F Fe THEN18 


Ly 

PRINT” (eK) (2 SPACESJEN 
DING ADDRESSE43"; sGOSUB. 
300 sEA=AD:GOSUB1936+1F 
{SPACE]P THENI90) 
INPUT" {3 DOWN) (BLK} CLEA, 
R WORKSPACE [Y/N1B43";A 
meety LETS (AS, 1) <>"¥"TH 
EN220) 

PRINTS (2 DOWN) LBLUI WORK | 
“ING ./."; sFORI=BS TO -BS+ | 
(SEE IERES T/O:NEXT<P 
‘RINT*DO! 

paairr7as (18) 702 DOWN) 
{BLK} (RVS} MUX COMMAND, 
{SPACE ]MENU {DOWN} £43” 
PRINT 2S" (RVSJBLOEPINTE | 
R DATA“ 

PRINT 3S" {RvSID{OFF}z5e 
LAY DATA" :PRINT TS” 
/{RVSJLLOPP)OAD PILE” 


ILE" :PRINT 


panier ns"(BV5}5{ EPIAVE | 
T$"{RVSIO 


(orejorrt2 DOW] (BER) 

GET AS:IP A$=NS$_THEN258 
A=O:FOR I=1T0 531F AS= 
MID$ (“EDLSQ”,I,1)THEN A 


/siriss 


“NEXT1ON A _GOTO425,618,6 
eee 288;sGOSUB1G60 260 


T0258 
PRINT" {RVS), our. yINpU 
‘T" (DOWN) E43ARE YOU SURE 
CY/NI"7AS3 IF. Oy, 
(1) 4>"°Y"PHEN228 
POKE/ SD+24,0:END ” 
INS=N$:AD=02 ANEUTING x1PF 
“LEN (INS) <>4THENRETURN 
BS$=INS :GOSUB320:AD=A;BS. 
SMID$ (INS; 3) #GOSUB32034 
D=AD*256+A?RETURN 


A=83FOR J=1 TO 2rASeurD y 


$(BS,J,1) sB=ASC(AS)=04+ 


AAS?" 0") #07 sA=A*CO+B 


IF/B<@ OR B>15 ‘THEN AD=_ 
O:A=-1sJ=2 
NEXT: RETURN 
BSINT(A/C6) PRINT. wos) 
/H§,B+1,1)7tB=A-B*C6 sPRI 
By MIDS$(HS,B+1,, UY ARE, 


y paren (np/z6), 1G0SUB350«A 


AD-A*Z6 SaOSDBASe APRINT 


“ckatwn(nb/26) SCKSAD=74* 


| -PX388 
Jc 398 
Qs 400 


=x. 4 
AD 420 


OK 438 
SK 440, 


8 ASG 


VBA, 468 


HD 479: 
PK 48, 


is 485 


CK+25* (CK>27): 3GOTO390~ 


(CK=CK*2Z2+25*(CK>Z7) 4B) 


(CK=CK+25* (CK>2Z5) sRETURN 


PRINT" {DOWNJSTARTING AD |” 


£43"; sGOSUB3@01IP INS<>” 
/N$ THEN GOSUB1930:1F F 


(SPACE) THEN4S9 

RETURN 

PRINT" {RVS} / ENTER DATA 
{SPACE}";GOSUB460:IF IN 
S=NS“THEN220°00 077 
OPENS, 31PRINT 

POKEL9B 6 :GOSUBI60:1P F 
THEN PRINT IN$ PRINT” 
{OP} {5 RIGHT}";— 

‘FOR I=8 10 24 STEP 3:8 
=S$;FOR Jel TO 2<1P F 1 | 
HEN BS=MID§(INS,1+J,1) 
PRINT" (RVS)"BSL$;s1F I< 
24THEN PRINT" (OPF}"; 

GET AS:IP AS=NG THEN 70 
IP (AS>"/"ANDAS <"+")OR(A. 
echt <"G" ) THENS40 
AR=(AS="M")-2* (ASS, ")— 


(SPACE }DATA 


B*(AS=".")—4* (ASS ")—5, 
*(ASR"I")-6* (AS="K") 


) ASA=7* (AS="L")-8*(AS="< 


")=9* (AS="U" )—18* (AS="T 


Y By (AS="0")-12*(AS=" 
Rondae(ngassy ete ATHE 


N’AS=MID$("ABCD123E456F 
"A, 1)2GOTO 546 
IF AS=RS$AND((1=6)AND(I 


/=1)OR FP) THEN PRINT BS$;+ 


J=2:NEXT:1=24:GOTO558 
IF ASS" [HOME] THEN PRT 
NT BS :J=2:NEXT:1=24:NEX 


SDs P26 sGOT0449 y 
IP (AS=" (RIGHT }")ANDF TH” 


ENPRINT BSL$71GOTO540 
IF_AS$<>L$ AND AS$<>D$ OR 
((1=0)AND(J=1)) THEN GOS 
UB1868:GOTO479 
AS=LS+S$+L$:PRINT BSLS+ 


( 49=2-3:1P J THEN PRINT. 


{ SPACE) LS$+2I=1-3/ 
PRINT) A$; sNEXT J+PRINT 
{SPACE]5$; 

NEXT IzPRINT:PRIND* (UP) 


/ (5/RIGHT)}"; sINPUT#3, INS 


TIP INS=NS$ THEN CLOSE3: 
GOTO220 
FOR I=] TO 25 STEP3:BS= 


MIDS (INS, I) 3GOSUB326:1F |’ 
1425 THEN GOSUB360+A(1 
13y=K, 


NEXT:IP A<>CK ‘THEN GOSU 
B1860<PRINT* {BLK} {RVS} 
{SPACEJERROR+ REENTER L 
INE £43"3P=13GOTOS4B 


GOSUB1 086 :B=BS+AD-SA: FO- 


RI=0 TO 7:POKE B+I,A(T 


/ NEXT 


AD=AD+8:IF AD>EA THEN C 


LOSE3 :PRINT" {DOWN} {BLU} 


** END OP ENTRY ** {BLK} 
{2 Down) ";GoTO788 
FaO3GOT0440 

PRINT” (oss) Coawa Vays )7 


ASPACE} DISPLAY DATA” 


OSUB400:1F INS=NS THEN 
20 


20 PRINT” * (DOWN) [BLU] PRESS « 


{RVSJSPACE(OFF) TO: PAU 
SE, {RYS}RETURN{OFF} TO 


/ BREAKE43 {DOWN} "" 
GOSUB3601B=BS+AD-8A:FOR 4 


IsBTO B+73A=PEEK(I) :GOS 
{UB3581GOSUB380 sPRINT S$ 


7 GL 
UNEXT3 PRINT” {RVS}"72A=CK “|” 


3GOSUB359:PRINT: 
P=11AD=AD+811F AD>EA TH 
ENPRINT™ {DOWN} {BLU} **/E. 
ND OF DATA **":GOT0226 
GET A$+1P A$=R$/ THEN GO 
SUB1080:G0TO220 

IF /A§=S§$ THEN F=F+11G0S 
UBIGBO 
ONFGOTO638,665,630 
PRINT™ {DOWN} {RVS] LOAD 
*:0P=1:GOTO 


718 i 
PRINT" (DOWN) (RVS] SAVE 


{SPACE] PILE ":0P=9 


INS=N$ sINPUT™ {DOWN} FILE j 


NAMEB43";IN$sIF INS=N$ - 
(SPACE) THEN22 

P= sPRINT™ (DOWN) {BLK} 
(RVS}T{OFPJAPE OR [RVS} 
D{OFFJISK: £43"; 

GET A$: IF A$="T"THEN PR 
INT"T [DOWN] "*«GOTOSSs. 
IF A$<>"D"THEN739 


PRINT*D( Dom) “sOPEN 

41542183" 1 
ox" Lang itP 0 OP” THEN 
OPEN /1,8,8,INS+",P/W 


_ OSUB86031F A "THEN220° 


AHSINT(SA/256) sAL=SA~( 
H*256) sPRIND#1, CHRS (AL 
7CHRS (AH); 

FOR I=@ TO B:PRINT#1, 
RS (PEEK(BS+1)) 7328 7 
HENBOO 

NEXT: CLOSE1 :CLOSE15 +G0 
0948 

GOSUB1660 : PRINT” [DOWN 
{BLKJERROR DURING SAVE: ~ 
£43" sGOSUB869 :GOTO220 
OPEN 1,8,8,INS4",P,R"tG” 
VOSUBBGQiIP A THEN220 
GET#1,AS,BS$ sAD=ASC(AS+Z 
$)+256*ASC(BS+Z$) IF AD” 
“28K. THEN /F=13GOTOBS! 
FOR 150/10’ B:GET#1,A$11 


NEXT:IF ‘ST<>64 THEN Fe: 
(CLOSE13CLOSE15:0N ABS (( 
28) +1 GOT0968,978 
INPUT#15,A,AS$3:IF A THEN 
CLOSE] :CLOSE15:GOSU! 
iii 
RETURN, 

POKE183, PEEK(FAt2) :POKE” 
187, PEBK(FA+3) sPOKEL8O 
PEBK(FA+A) $IFOP=OTHENS2/ 
@ 


SYS 6346611 (PEEK(783)A. 
NDI) THEN, GOSUBIO60 sPRIN 
T'{DOWNJIRVS) PILE: NOT”) 
ASPACEIEOUND ":GOTO69B 
AD=PERK(629)4256*PEEK (. 
//3O)32E ADS>SR/ THEN) F=1 3 
GOTO978 
RaPEEK(831)4256* PEEK ( 3 
J 2) r Li BSE-2*( ACER) =34 (A> 
JER) sADSA=AD:GOTO938. 
ASSA:BSER+1 :GOSUBIO10 y 
 OKE786,3:SYS 63338 
A=BS:B=BS+(EA-SA)+12G05, 
UB1619:0N OP GOTO959:s' 


POKE147,0:SYS: Ca562s18 y 

ASPACE)STSB THENS78 
GOSUB1980:PRINT" {BLU} * 
LES COMPLETED **"sG' 


Gosu81060 PRINT" (rk) y 


(DOWN }R43"s0N, F GOSUBSB” 
9,990, 1900+G0T0220" 


988: 


998 


AD=SA+AD:GOSUB369 :PRINT: 
D$sRETURN 4 


1098 PRINT "TRUNCATED AT END! 


ING ADDRESS";RETURN 


1910 AH=INT(A/256) sALSA-( AH | 


rakes #POKE193,AL?POKE) 
4, AH. 


1026 Asean (8/256) tALSB-(AH- 


#256) sPOKE174,AL:POKEl | 
75, AHsRETURN 


1936 IP AD<SA OR “AD>EA HEN 


1858 


1048 Ip(ADy511 AND AD<: 
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HC 1658 
AR 1860 
DX 10678 


PF 1688 


AC 18908 


128 
AE 100 


xP 110 


FB 129 


KE 130 


JB 149 


Fd 156 


166 
FE 170 
DK 186 
FH 


196 


MP 200, 


| De 220 


HB 239 
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JOR(AD> 49151 AND AD<53 
248) THEN GOSUB1080:F=0 
:RETURN 

GOSUB1960:PRINT"(RVS) 
{SPACE} INVALID ADDRESS. 
(DOWN) (BLK) "2P=1:RETU 


RN 
POKE SD+5,31:POKE SD+6 
+208:POKE SD,240:POKE 
{SPACE}SD+1,43POKE SD+ 
4,33 

FOR S=1 10 100:NEXT:GO 
TO109B 

POKE SD+5,8:POKE SD+6, 
240;POKE SD,®:POKE SD+ 
1,903POKE SD+4,17 

FOR S=1 10 100:NEXT:PO 
KE SD+4,8:POKE SD,@:PO 
KE SD+1,0:RETURN 


Program 2: MLX For Commodore 


TRAP 960:POKE 4627,128: 
DIM NL$,A(7) 
22=2124=254125m255 1 26=2 
561275127 :BS=256*PEEK(4 
627) sEA=65280 

BES=CHRS$ (7) 2RT$=SCHRS$ (13 
) :DL$=CHR$ (20) sSPSSCHRS 
(32)2LF§=CHR$ (157) 

DEF FNHB(A)=INT(A/256) + 
DEF FNLB(A)=A-FNHB(A)*2 
56;DEF FNAD(A)=PEEK(A)+ 


_ 256*PEEK(A+1) 


KEY 1, "A"tKEY 3,"B"sKEY 
5, "C"sKEY 7,"D"sVOL 15 
tIP RGR(G)=5 THEN PAST 
PRINT" (CLR}"CHR$ (142); 
HR$(8):COLOR 0, 153COLOR 
4,15:COLOR 6,15 f 
PRINT TAB(12)"{RED)} 
{RVS}{2 SPACES}89 @} 
{2 SPACES) "RT$;TAB(12)" 
(rvs) (2 SPACES) forr) 
{BLU} 128 MEX {RED} 
{RVS} {2 SPACES} "RP$;TAB. 
(12)"(Rvs} {13 SPACES} 
{BLU)" 
PRINT"{2 DOWN) 
{3 SPACES)COMPUTE! 'S MA 
CHINE LANGUAGE EDITOR 
(2 pown)}" 
PRINT" (BLK) STARTING ADD 
RESSE44";:GOSUB 260:1F 
{SPACEJAD THEN SA=AD:EL. 
SE 180 
PRINT" (BLK) {2 SPACES)EN 
DING ADDRESSE 43"; :GOSUB 
260:1F AD THEN BASAD:E 
LSE 190 
PRINT" [DOWN] (BLK) CLEAR 
{SPACE}WORKSPACE [Y/N]? 
B4¥":GETKEY A$:IF AS<>" 
Y" THEN 220 
PRINT" {DOWN} {BLU} WORKIN: 
G...";2BANK 6:FOR A=BS 
{SPACE}TO BS+(EA-SA)+7+ 
POKE A,@:NEXT A:PRINT"D 
ONE" 
PRINT TAB(10)"{DOWN} 
{BLK} (RVS} MLX COMMAND, 
{SPACE)MENU £43 (DOWN}": 


_ PRINT TAB(13)"{RVSJE 


(OFF INTER’ DATA"RTS$; TAB ( 
13)"{RVS}D(OFF }ISPLAY D 
ATA"RTS$;TAB(13)"(RVS)L 
{OPFJOAD FILE" 

PRINT TAB(13)"(RVS}S 
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AP 


8X 


Qa 


PS 


BA 


248 


250 


260 
2708 


280 
298 


388 
316 
328 


330 
348 


350 
360 


378 


400 


420 


Aon 


580 






{OPPJAVE FILE"RTS;TAB(1 
3)"{RVS}C{OPF }ATALOG: DI 
SK"RT$;TAB(13)"{RVS}Q 
(orr}urT (Down) (BLK)" 
GBIKEY AS:ASINSTR("EDLS 
CQ",AS$)10N A GOTO 340,5 
$8,648,659, 930,940:GOSU 
B_9583GOTO 240 
PRINT"STARTING AT"; :GOS 
UB 260:1P(AD<>6)OR(AS=N 
L$) THEN RETURNtELSE 250, 
AS=NL$:INPUT A$:IF LEN( 
A$)=4 THEN AD=DEC(AS) 
IF AD=® THEN BEGIN<IF A 
$<>NL§ THEN 300:ELSE RE 
TURN 1 BEND 
IF AD<SA OR AD>EA THEN 
{SPACE} 309 
IF AD>S511 AND AD<65260 
(SPACE]} THEN PRINT BES; + 
RETURN 
GOSUB 958:PRINT"{RVS} I 
NVALID ADDRESS {DOWN} 
(BLK)"sAD=0 RETURN 
CK=PNHB (AD) 3CK=AD-24*CK 
4+25%(CK>27) GOTO 330 
OK@=CK*Z2+25*(CK>27) +A 
CK=CK+25* (CK>25) :RETURN 
PRINT BES; "(RVS} ENTER 
{SPACE}DATA ":GOSUB 256 
IF AS=NL$ THEN 220 
BANK @:PRINT:P=0:0PEN 3 





3 

1 / 

GOSUB 310:PRINT HEX$(AD 
)4+"2">2IF F THEN PRINT 
(SPACE JL$:PRINT" (UP) 

U5 RIGHT)"; 

FOR I= TO 24 STEP 3:8 
=SP§:POR J=l T0 2:1P F 
(SPACE) THEN BS=MIDS$(LS, 
I+d,1) 

PRINT" (RVS)"BS+LP$;31F 
{SPACE}1<¢24 THEN PRINT” 
(orr yj"; 

GEPKEY AS+IF (A§>"/" AN 
D A$<"3") OR(AS> "0" AND 
AS<"G") THEN 470 

IP /ASS"4" THEN AS="E"1G 
oTo 476 

IF “A$S"=" THEN AS="F":G 
oro 478 


IF A$=RT$ AND ((T=0) AN 


D (01) OR PF) THEN PRIN 
BS; 1d=2:NEXT:1=24:GOP 
© 4B 

TE A§="(HOME}" THEN PRI 
NT B$:d=2iNEXT: 1924 :NEX 
1:F=0sGOTO 360 

IF (AS="(RIGHT)}") AND F 
THEN PRINT BS+LP$;1GOT 
0.471 

IF A$<>LE§ AND AS$<>DLS 

{SPACE}OR ((T=6) AND (7 
=1)) THEN GOSUB 959:cOT 
0 390 

ASSLPS+SPS+LPS (PRINT BS 
+LP§710=2-Tr1P J THEN P. 
RINT LFS; sI=I-3 

PRINT A$; :NEXT J:PRINT 

{SPACE}SP$; 

NEXT I:PRINT1 PRINT" (UP) 
{5 RIGHT} "72L$=" 

{27 SPACES} 

FOR I=] TO 25 STEP 3:GE 
D#3,A$,B$:IF AS=SP$ THE 
N I=25;NEXT:CLOSE 3:GoT 
0 226 

AS=AS+B$ :A=DEC (A$) «MIDS 
(L§,1,2)SAS:IF I<25 THE 
N GOSUB 32B1A(I/3)=A:GE 
T#3,A$ 


Mc 


oF 


Gc 


GA 


FD 


5198 


550 


568 


570 
58 


598 


600 


610 
628 


630 
640 


6508 
660 


676 


680 


690 
70) 


716 


720 


738 


748 


750 


768. 





NEXT I:IF A<>CK THEN GO 
SUB 950:PRINT:PRINT™ 
{RVS} ERROR: REENTER LI 
NE ":P=1:GOTO 368 
PRINT BE$:B=BS+AD-SA:FO 
R I=@ TO 7:POKE B+I,A(I 
) :NEXT I 
F=0;AD=AD+8:IF AD<SEA 
HEN 36) 
CLOSE 3:PRINT" {DOWN} 
{BLU}** END OF ENTRY ** 
{BLK}{2 DOWNJ":GOTO 658 
PRINT BE$;"{CLR} {DOWN} 
{RVS} DISPLAY DATA "3GO 
SUB 256:IF AS=NL$ THEN 
{SPACE}220 
BANK 6:PRINT" (DOWN) 
{BLUJPRESS: [{RVS}SPACE 
(OpF} T0 PAUSE, {RVS}RE 
TURN(OFF} TO BREAKE42 
{Down} " 
PRINT HEX$(AD)+" 
UB 310:B=BS+AD-SA 
FOR IB TO B+7:A=PEEK(I 
):PRINT RIGHTS (HEX$(A), 
2);SP$;:GOSUB 326 :NEXT 
{SPACE}I 
PRINT" MY IRIGHTS (HEX 
$(CK),2 Y 
Fel: Me AD>EA TH 
EN PRINT" {BLUJ** END OF 
DATA **":GOTO 220 
GED A$s1F AS=RTS THEN P| 
RIND BE$:GOTO 228 
IF AS#SP$ THEN F=F+1:PR, 
INT BES; Y 
ON F GOTO 570,610,570. 
PRINT BES" (pow) {avs} L 
Oss “30P=1:GOTO 66 


GOS 








SG BE$" {DOWN} {RVS} 5 
AVE PILE ":0P=0 

Pa 7 PS#NL$ + INPUD"PILENA 
MER43";FS:IF PS=NL$ THE 


N 226 j 
PRINT" (DOWN) {BLK} {RVS}T 
{OFF}APE OR {RVS}D{OFF} 
ISK: £43"; 

GETKEY A$31F AS="D" THE 
N 850:BLSE IF AS<>"D" 7 
HEN 680 

PRINT "DISK{DOWNJ"sIP OP 
THEN 760 

DOPEN#1, (F$+",/P") WeIP 
{SPACE}DS THEN AS=D$:G0° 
TO 7A0 

BANK @3;POKE BS-2,FNLB(S 
A):POKE BS-1,FNHB(SA):P- 
RINT"SAVING ">; F$:PRINT 
FOR ASBS-2 TO BS+BA-SA; 
PRINT#1,CHR$(PEEK(A)) 73~ 
IF ST THEN A$="DISK WRI 
TE BRROR":GOTO 756 

NEXT AiCLOSE 1:PRINT* 
{BLUJ** SAVE COMPLETED 
{SPACE JWITHOUT ERRORS * 
*":GOTO 226 

IF DS=63 THEN BEGIN:CLO 
SE 1;INPUT" {BLK} REPLACE 
EXISTING PILE [¥/NJ&49 
“PAG$:IP AS="Y" THEN SCR’ 
ATCH(F$):PRINT:GOTO 786 
sELSE PRINT“ (BLK}":GOTO 
660:BEND 

CLOSE 1:GOSUB 950:PRINT 
“{BLK} (RVS} ERROR DURIN 
G SAVE: £43":PRINT AS$:G 
OTO 226 y 
DOPEN#1, (FS+",P"):IF DS 
‘THEN Repban sere claee 
{SPACE}1:GoTO 798 





(AS, BS1CLOSE 13AD=" 
ASC(A$)+256*ASC(BS) :IF Z 
SERCO Es ‘THEN Fol: 


GOTO 7! 
PRINT"LOADING “;$:PRIN 
T:BLOAD(P$),89,P(BS) sAD 
=SAPNAD(174)-BS-13 P=-2 
*(ADSEA)=3* (AD> EBA) 


“qp0P THEN BOOsELSE PRIN | 


T"{BLU}** LOAD COMPLETE 


GOSUB 950sPRINT" LBLK). 


PRINT "LOAD ENDED. AT 
EX$(AD) RETURN 
PRINT "TRUNCATED AT END: 


NG ADDRESS © (SHEXS (BA) ) 
IRN” q 


ech ERROR. 1K8 1 


BRIBE PEAPEY {AD=POINTER(. j 


F$) BANK 1:A*PEEK(AD):A_ 


L=PEBK(AD+1) | AHSPEBR ‘AD , 


(42) - 


9, 118¥S DEC("EPBA) 1, 


‘1,8:SYS DEC("FFBD' 
L,AMlsSYS DEC(*FF90" 
BiIF OP THEN 890 


PRINT:A=SA?B=EA+1:GOSUB 


202SYS DEC("E91' 
PRINT"SAVING “;F$ 
/A=BS 3 B=BS+(EA-SA)+1:G 
UB 926:SYS DEC("EA18 
PRINT” SUEZ TAP 


PRINT LOADING ctr . (DOWN 
™zAD=FNAD( 2817) 2IF AD<> 


SA THEN F=1;GOTO 808:EL 


_ SE ADSFNAD(2819)-1:F=-2' 
*(ADSEA)-3*(AD>EA) 


| A=BS: B=BS+(EA-SA) +1 sGOS 


UB 920;:SYS DEC("B9FB"): 
y oi ST>® THEN 800:ELSE wy 


POKEL93, PNLB(A) sPOKE194 
/ENHB(A)<POKE 174, ENLA( 
(B):POKE 175, PNHB(B) iRET 
URN 4 Z 4 
CATALOG + PRINT" [DOWN] 
 (BLUJ** PRESS ANY KEY P 


OR MENU **":GETKEY Lost 


oro 220 
| PRINT BES"{RVS) gurr 
B43"; RTS; "ARE YOU SURE 
{SPACE} (¥/N]2"3GETKEY A 


S3IP ES Rian ae THEN 226:E | 


LSE PRINT" {CLR}": BANK” 

StEND 

SOUND 1,500,10 RETURN 
3 if ERA14 AND 68 

N RESUME 300 








| IF ER=14 AND EL=580 THE 


__Ps4:AS=DS$: RESUME 890. 


IP ER=30 THEN) RESUME? EL 


_ SE PRINT ERR$(ER);" ERR 
“ORIN LINE";EL 
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All programs 


magazine are 
available on the 
GAZETTE Disk. 


Before typing in programs, please 
refer to “How To Type In 


COMPUTE!s GAZETTE Programs,” 
which appears before the Program 
Listings. 





Persuasion 
(Article on page 48.) 


RS 16 


SP 20 


SM 38 


MB 40 


PR 50 


listed in this 


See details 
elsewhere in 
this issue. 





BEFORE TYPING ... 


POKE 53269,0:POKE 53280, 
7:POKE 53281,7:PRINT" {CL 
R}{4 DOWN} {RED}" 

PRINT" {RVSJEKA(2 SPACES} 
{OFF}{DOWN}{3 LEFT} {RVS} 
&KI{2 SPACES} (OFF) [DOWN} 
{3 LEFT) (RVSJEK3 (OFF) EK 
{Rvs} £K} (OFF) &KA{ DOWN] [4 
LEFT) (RVS}&KI(OFF}RKI(R 
VS}&KI(OFF}&KI (DOWN) (4, L 
EFT } (RVSJEK3(OFF J &KI{RVS 
JEKI(OFFJEKI{DOWN} [4 LEF 
T) {RVS}EK3 (OFF J EKI(RVSJE 
KA(OFFJEKI"; 

PRINT" {DOWN} (4 LEFT] ({RVS 
JEKI{2 SPACES} (OFF) [DOWN 
}(3_LEET) (RVSJBKI(2 SPAC 
ES) {OFF} {DOWN} (3 LEFTJ(R 
VS}EKI(OFF}&KI(DOWN)} (2 L 
EFT } (RVS)&K3 (OFF) £KA( DOW 
N}(2 LEFT} (RVS)EKI(LOFFIE 
K3({DOWN}(2 LEFT} (RVSJ&KI 
(OFF }&KI(DOWN](2 LEFTJ(R 
VS}EKI(OFF}&KI{ DOWN) [2 L 
EFT} (RVSJEKI(OFF)JEKI(6 U 
pj" 

PRINT" (UPJ {RVS] BKI(OFF)R 
K}_(RVSJRKI(2 SPACES) [OF 
F)RKI(RVS}EKI(2 SPACES) 
OFF}{2 SPACES}(RVSJ(2 SP 
ACES} {OFF} (RVS}&KI(OFF) 
&ka(RVS)EKI(OFFJRKA (RVS 
JEKI{OFF}EKI(2 SPACES} (R 
VS}{2 SPACES) lOFF}{2 SPA 
CES} {RVS}(2 SPACES} (OFF) 
{2 SPACES}(RVS}|2 SPACES 
J(OFF) (RVS}RKI (OFF) BKIL 
RVSJEKI(OFFJEKJ (RVSJEKI 


PRINT" {OFFJEKI {(RVSJEKI[ 
OFFJEKI{2 SPACES}{RVS)&K 
J{OFF J EKI(RVS}EKI(OFF)EK 
A{RVSJEKI (OFF) EKI(RVSJEK 
3 (OFF) KI (RVS)EKI(OFFIRK 
a(RVS)EKI(OFFJEKI (RVS}( 
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JK 68 


CH 708 


HG 88 


GE 90 


2 SPACES) {OFF} [{RVS]&K3{ 
OFF }&KA(RVS} EKA (OFF J EK} 
{RVSJEKI(OFFJEKI (RVSJEK 
J (OFF } EKA (RVS}EKI(OFF} EK 
A(RVSJ8KI EKI(OFF}EKI"; 
PRINT" (RVS}RK3 {OFF} &KI 
URVS)&K9(OFF}&K3(2 SPACE 
S](RVS}BK3 (OFF) EKI{RVSIE 
KA (OFF) &KI(RVS}EK3{OFF}E 
K}{2 SPACES) (RVS}EKI(OFF 
JEKI(RVSJEKI (OFF) EKA{RVS 
J&KI(OFF} EKI(RVS}EKI [OFF 
JEKI(RVS}EKI{OFF}EKI{3 S 
PACES} (RVS}RK3(OFF}BK} 
RVS}&K9 (OFF) EK3(RVS) EKA 
OPP J EKA (RVS) &KA[2 SPACES 


PRINT" (OFF }&KJ (RVS)EKI( 
OFFJRKA (RVS}RKI (OFF)RK 
2 (RVS}BK3(2 SPACES) (OFF 
J(2 SPACES} (RVS}{2 SPACE 
SJ{OFF) (RVS}EKI(OFF}&KI 
(RVS}BKI (OFF } EK3(RVSJEKJ 
(2 SPACES}{OFF]&K] (RVS} 
(2 SPACES} OFF}{2 SPACES 
J (RVSJEK3(OFF)RKJ [RVSJE 
Ka (OFF) &KI(RVS)EKI(OFF)E 
K3(RVS}RK3(2 SPACES) (OFF 
JBKI"; 

PRINT" {(RVSJEK3(OFFJRKI 
{RVS}EKI{OFF}RKI{2 SPACE 
S)(RVSJEKI (OFFJEKI{3 SP 
ACES } {RVSJ&K9(OFF}EKI(RV 
S)8K4 (OFF } &KI(RVS} EKI OF 
F)RKA(RVSJ EKA (OFF) EKILRV 
S)RKI(OFF}EKI(2 SPACES) [ 
RVSJRKI(OFFIRKI (RVS)EKI 
(OFF) EKI (RVS)RKI [OFF] RK 
A(RVSJ EKA (OFF) EKALRVSJEK 
J(OFFJEKI{RVS} LOFF)"; 
PRINT"EK3 (RVSJ EK] (OFF) 
Ka (RVSJEKI(OFF)EKI(2 SP 
ACES } (RVS} &KI (OFF) EKI(RV 
S) OFF) (RVS)EKI(OFF)&K 
A(RVS J KI (OFF) EKI(RVSJEK 
V(OFF) &KA(RVS) EKI(OFF) EK 
A(RVSJ&KA (OFF) &KI(RVS} EK 
J (OFF J BKI(RVS) EKA (OFF) EK 
ALRVSJRKI(OFFJEKI (RVSJE 
KA(OFF}&K3 (RVS}EKI(OFF) 
BK3(RVSJEKA(OFF)EKI"; 


GQ 100 PRINT" (RVS)&KI {OFF} &KI( 


RR 


15: 


PC 


EP 


176 


RVS}RKA{OFFJEKJ {RVS}EK 
ALOFFJEKI (RVSJRKI(2 SP 
ACES } [OFF } K3(RVS} 8KI (0 
FP JRKI(RVS}RKI(OFF) EK 
(RvS}(2 Spaces} {OFF} {2 
SPACES} (RVS}{2 SPACES} ( 
OFF} (RVS)&KI(OFF)EKI(R 
VS}BKI(OFFJEKA [RVS}(2 
SPACES} OFF}{2 SPACES} { 
RVS}(2 SPACES) (OFF}{2 Ss 
PACES} (RVS}{2 SPACES} (0 
FF} [RVS}"; 
PRINT" &K3 (OFF J RKI{RVS)E 
K3 (OFF) BKA"CHRS (8) 

POKE 53269,8:POKE 53249 
+@:POKE 53251,6:PL=1 
FOR I=828 TO 892:READ A 
sPOKE I,A:NEXT 

DIM C(1,15):FOR A=1T0 6 
+READ P:READ C(6,P),C(1 
+P) :NEXT:FOR A=@ TO 6 





@ READ X1(A),X2(A) :NEXT:F 


OR A=896 TO 959:READ B: 
POKE A,B:NEXT:POKE 2640 
114 

POKE 2041,14:POKE 53269 
132X(8)=5 :¥(8)=8:X(1)=5 
+¥(1)=6 :W(8)=6 :W(1)=11 
POKE 53288,7:POKE 53287 
8 

' 
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JA 


PR 


HP 


xQ 


cc 
AS 


oH 


XK 


EM 


KP 


cD 


FA 


186 


198 


208 


210 


220 


2308 
240 


250 


268 


278 


2808 


298 
308 


318 
328 


3308 


340 


351 


8 


368 


378 


388 
398 


PRINT" {CLRJ {DOWN }": SYS 
828 :PC=1063 :CP=55335 
DN$="{HOME}{23 DOWN} TRV 
S)E£43(7 SPACES}":DS="[R 
Vs } P{ DOWN) {LEFT JE(DOWN} 
{LEFT }R{ DOWN } {LEFT }S{DO 
WN) (LEFT )U{ DOWN) {LEFT JA 
(Down ) (LEFT JS { DOWN } {LEF 
T}1{ DOWN) (LEFT Jo{ Down} { 
LEFT JN" 
ES="(RVS} (DOWN) (LEFT) 
{DOWN} {LEFT} [DOWN}(LEF 
T) (DOWN) (LEFT} {DOWN} { 
LEFT) {DOWN}{LEFT) {DOW 
NJ(LEFT) {DOWN} (LEFT) [ 
DOWNJ{LEFT) " 
A$="(RED) (RVS}(2 SPACES 
}(DowN} (2 LEFT} {2 SPACE 
S)(OFF)":B$="{YELJN({2 S 
PACES JM":C$="{YELJM{2 S 
PACES JN" : SP=13 :AC=3:FOR 
X=1 TO 4:PRINTSPC(SP); 
FOR I=] TO AC:PRINTAS"{ 
DOWN} {3 LEET)"BS$"{2 UP} 
(3 SPACES)"; :NEXT:SP=SP 
3 :AC=AC+1 :PRINT"{2 DOW 
N)"sNEXTX 
GOTO 260 
SP=SP+6 :AC=AC-2 :PRINT"( 
2 UP)":FOR X=1 TO 3:PRI 
NT SPC(SP);:FOR I=1 TO 
ac 
PRINT A§"(DOWN)(3 LEFT} 
"B§"(2 UPJ{3 SPACES)"; 
NEXT: SP=SP+3 :AC=AC=1:PR 
INT"(2 DOWN) “:NEXT 
SP=SP+5:AC=AC~2 sPRINT"{ 
3 UP}"sFOR I=] TO 3:PRI 
NT SPC(SP);:FOR X=1 TO 
AC 
PRINT C$"{DOWN}{3 LEFT} 
"A$"(3_ SPACESJ{2 UPJ"; 
NEXT: SP=SP+3 :AC=AC~1:PR 
INT" (2 DOWN] ":NEXT 
PRINT" (HOME) (RVS} {BLU} ( 
39 SPACES) ":MT$="(RVS} 
(OFF}":POKE PC,160 
POKE CP,6:T=12:M=11 :AE= 
14:FOR Z=1 TO 10 
FOR I=] TO T:PRINT MTS; 
1NEXTs PRINT "£"SPC(AE) ; 
+PRINT"£*}" 7 
FOR I=1 TO M:PRINT MT$; 
1NEXT 
PC=PC+49 1CP=CP+48 :POKE 
PC,168:POKE CP,6:T=T=1: 
M=M=1 :AE@AE+2 :PRINT 
PRINT" (UP}":NEXT:PRINT" 
{RvS}(3 SPACES}"SPC(34) 
"(RVS}(2 SPACES} (OFFJ": 
PRINT: POKE PC+40,160:PO 
KE CP+46,6 
POKE PC+80,160:POKE CP+ 
80,11 1PC=PC+80 : CP=CP+80 
sPRINT"(2 UP)"; 
PRINT"£49(RVS}(3 SPACES 
J"SPC(34)"(RVS}(2 SPACE 
S) (OFF )":T=T+1:M=M+1:AE 
=AE-2:FOR Z=1 TO 16:FOR 
I=1 TOT 
PRINT MT$;:NEXT:PRINT"( 
RVS)E*3"SPC(AE) ; :PRINT" 
(rvSJ£";sFOR I=1 TO Mr 
PRINT MT$;:NEXT 
PC=PC+40 :CP=CP+49 :POKE 
PC,168:POKE CP,11:T=T+1 
1M=M+1 :AE@AE-2 :PRINT:PR 
InT"{UP}" 
NEXT: PRINT" (RVS}(39 SPA 
CEs}" 
PRINT" {RVS}{39 SPACES} [( 
HOME J" 








JH 


KE 


JK 


Dx 


JB 


DX 


AR 


KR 


GR 


DF 


SF 
RG 


JQ 
AR 


PD 


FX 


JE 


EB 
Fa 


480 


416 


420 


438 


440 
450 


460 


470 


480 


490 


588 


518 


520 


530 
548 


550 
560 


578 


580 


590 


608 


610 
620 


630 
640 


658 


668 


670 


688 
690 


POKE 1983,160:POKE 2023 
11601POKE 56255,11:POKE 
56295,11 

POKE 53281 ,8:SP=53248:P 
RINT" {HOME}{3 DOWN} (RVS 
J (BLU) NORTH{2 DOWN} 14 
LEFT )"SC(8)" (LEFT }{RVS} 


PRINT"{12 DOWN} (RVS}E49 
SOUTH{2 DOWN} {4 LEFT)" 
Sc(1)"{LEFT}(Rvs} “ 
IX(5)=—1:T¥(5)=—125X(6) 
==11J¥(6)=119X(9)=11I¥( 
9 m1 29X(18)=1 1J¥(10)=1 
GOSUB 730 

PL=-(PL=O) :TS=PEEK (5328 
7) sPOKE 53287, PEEK(5328 
8):POKE 53288,TS 
IFPL=1THENPF=11 :PRINT"{ 
HOME } { DOWN } {BLU} "SPC(39 
)E$ :PRINT" {HOME} {13 DOW 
N}R49"SPC(39);:GOTO 486 
PRINT" (HOME } (13 DOWN} E4 
3"SPC(39) E$ :PP=6 :PRINT" 
{HOME} | DOWN} [BLUJ "SPC(3 


9); 

POKE 646,PF:PRINT D§$"(H 

OME}" 

JV=PEEK ( 56320) :0=15-(JV 

AND15) :X=X(PL) :Y=¥(PL) + 

X=X+IX(J) 1¥=¥+J¥ (J) 

IF Y¥<O OR Y>6 THEN 498 
IF X<X1(¥) OR X>xX2(¥) 0 
R J¥(J)=@ THEN 498 

X( PL) =X t¥ (PL) =¥15=55380 

+X* 34+Y" 120 1C=PEEK(S) AND 
15:QQ81:GOSUB 730 

IF C(PL,C)=W(PL) THEN S 

C(PL)=SC(PL)+1 :QQ=2 

IF C(PL,C)=2 THEN SC(PL 
)=sc(PB)-1 

GOSUB 690 

IF C(PL,C)=15 THEN POKE 
$,15:POKE S+1,15:POKE 
8+48,11:POKE S+41,11:GO 
TO 598 

IF C(PL,C)=14 THEN POKE 
8,14:POKE S+1,14:POKE 
S+46,6:POKE S+41,6:GOTO 
598 

FOR A=@ TO 1:FOR B=8 TO 
1:POKE S+A+B*48,C(PL,C 
) sNEXTB, A 

PRINT" {HOME} (3 DOWN] (RV 
S}(BLUJ NORTHL2 Down) {4 
pear esc (2 aE EET URS 


PRINT"(11 DOWN} (RVS}R49 
SOUTH{2 DOWN}{4 LEFT}" 
SC(1)"{LEFT}(RVS} " 

IF SC(6)=15 AND SC(1)=1 
5 THEN 680 

IF SC(®)=16 OR SC(1)=16 
THEN 640 

Goro 450 

IF SC(1)>SC(@) THEN PRI 
NTDN$" THE SOUTH IS THE 
WINNER({12 SPACES} (HOME 
J} ":GoTO66S 

PRINT DN$" THE NORTH IS 
THE WINNER|12 SPACES) { 
HOME }" 

PRINT DN$" {DOWN} {RVSJ}{L 
EFT)PRESS ANY KEY TO PL 
AY AGAIN|HOME)":POKE 19 
8,O:WAIT 198,1 
PRINT"{CLR}":POKE 53281 
+7:RUN 120 

PRINT DN$"{8 SPACES}IT' 
S A TIE(HOMEJ":GOTO 660 
FOR 0=1 TO QQ:FOR L=542 
72 TO 54295 








ME 700 POKE L,@:NEXT:POKE 5429 
6,15:POKE 54277,8:POKE 
54278,255:POKE 54276,23 

PB 710 POKE 54287,4@:POKE 5427 
8,15:FOR I=] TO 10:POKE 

54273,1:NEXTI,O:RETURN 

SH 720 POKE 646,PF:RETURN 

OM 730 Hl=51+X(8) *241H2=51+X(1 
)*24:POKE SP+1,0:POKE S 
P+3,0 

JD 749 POKE SP,H1 AND 255:POKE 
SP+2,H2 AND 255:MS=INT 
(H1/255)+2*INT(H2/255) 

SB 750 POKE SP+16,MS:POKE SP+1 
164+Y¥(0)*24:POKE SP+3,6 
4+¥(1)*24: RETURN 

PX 760 DATA 169,27,141,17,208, 
169,127,141,13,220,169 

DF 778 DATA 86,141,26,3,169,3, 
141,21,3,169,129 

AC 788 DATA 141,26,208,96,169, 
1,141,25,208,162,5 

DC 790 DATA 168,11,173,18,208, 
201,10,176,4,162,146 

DS 806 DATA 160,6,140,32,208,1 
42,18, 208,173,13,220 

DP 810 DATA 41,1,240,3,76,49,2 
34,76 ,188,254 

BF 820 DATA 2,5,5,5,14,15,14,6 
+5,15,5,11,6,2,6,11,11 

XH 830 DATA 2,3,7,2,8,1,9,86,18 
11,9,2,8,3, 

ME 848 DATA 8,8,8,0,0,0,31,255 

MD 850 DATA 252,31,255,252,28, 
8,28,28 

PK 868 DATA 255,156,28,193,156 
128,193,156 

DJ 876 DATA 28,193,156,28,193, 
156, 28,255 

EB 889 DATA 156,28,192,28,28,1 
92,28,28 

QB 89 DATA 192,28,28,192,28,2 
8,192,28 

JC 986 DATA 28,0,28,31,255,252 
431,255 

SH 910 DATA 252,0,8,0,0,8,0,0 


Ringside Karate 


See instructions in article on page 
52 before typing in. 

3000:00 OF CO BO 15 50 OO 3F 65 
3008:F0 00 3F AD OO 3F BO OO 31 
3010:3B AS 08 3A AD OO 2A AD DS 
3018108 2A OB GB 3A GB BG SE 33 
3028:78 61 57 5C G1 75 57 @1 37 
3028:5D 55 03 57 5A @@ DS AA 8B 
3030:08 36 AB GB 1D 70 OG 15 F2 
3038:70 00 15 76 OO 3F FO OF 68 
3048:88 08 8 OB OB BO OO OO AD 
3048188 88 B68 BB B8 BO BB BB AB 
3050:00 00 G6 BB 00 OO BG OO BO 
3058100 00 20 8 0 OO G2 BO BC 
3060100 02 80 6 BA CO OO GB 10 
3068:08 09 6C GB OO 70 OB GO 18 
3076:C® 89 BO GB O8 OO OB BO 31 
3878:08 00 00 GB OO OO BO OB E3 
3880:08 15 70 @B 55 5C OO 55 AS 
3088:5C 01 55 57 G1 55 57 01 84 
3898:55 57 05 5F 55 05 70 15 BC 
3898:05 70 15 15 CO 05 15 co 90 
30A8:85 15 CO 95 17 88 O1 17 03 
30A8:00 01 17 OO O1 17 OF O1 AF 
30B0:17 3F Cl 2B FF FE 3F CO 92 
30B8:3F 00 06 06 06 OO OO OF C7 
30C0:08 09 OB GB GO GO Bo BO 21 
30C8:08 BO GO OB BO oo oo BO 29 
30D8:6B GB CO BB BO CO OB BO 4C 
30D8:CO GO BO 76 GO GO 70 BB Bl 
30E0:08 70 00 OO 76 BO GB 70 51 
30E8:08 99 76 GO GO 70 BO BO 19 
30F8:78 60 0B AC BB BO FC BB 4E 











30F8 100 
3188 :88 
3108:5F 
3110:55 
3116:01 
3120:05 
3128:5C 
3130300 
3138:0F 
3140 180 
3148 1FC 
3158 303 
3158168 
3168:Ad 
3168115 
3178108 
31781:A9 
3188100 
3188100 
3198:08 
3198188 
31A8 108 
31A8:6A 
31B0:70 
31B8 100 
3108360 
3108157 
31D8:81 
31D8 160 
31E0:5C 
31E8:55 
31P0:15 
31F8:FF 
3200 :08 
3208:00 
3210 :088 
3218:55 
3220100 
3228:CO 
3230:C5 
3238108 
3248188 
3248:CO 
3250:EE 
3258 :88 
3260:D5 
3268155 
3270115 
3278:5D 
3280:00 
3288:00 
3298:AS 
3298 16A 
3208 100 
32A8:01 
32B0:05 
3288180 
3208 100 
32C8:55 
32D8 :01 
32D8 108 
32E0:70 
32E8:15 
32F0 188 
32F8:0F 
3300:57 
3308 108 
3316108 
3318:88 
3320 :08 
3328100 
3330:00 
3338:FF 
3340100 
3348108 
3350:BA 
3358 :82 
3368 108 
3368:D5 
3378183 
3378:CO 
3380108 
3388 108 
3398100 
3398 :BO 


rT 
co 





33A8:00 
33A8 200 
33B0:Ad 
33B8 :80 
33C8:80 
33C8:55 
33D0:55 
33D8 :81 
3356 160 
33E8:70 
33¥0:01 
33F8:FO 
3486 :00 
3488 60 
3410:00 
3418150 
3428100 
3428300 
3430108 
3438:00 
3448108 
3448 108 
3456 :00 
3458 :00 
3466 :00 
3468103 
3478100 
3478 :EA 
3486 :00 
3488 60 
3498 :88 
3498300 
3408 308 
3448100 
34B0 308 
3438100 
34C8:00 
348397 
34D0:55 
34D8:03 
34EG:FF 
34E8:F5 
34F0:B5 
34F8:FF 
3508100 
3598 :08 
3516:80 
3518:0F 
3528:80 
3528157 
3530:FF 
3538:FC 
3540:00 
3548300 
3558:00 
3558 108 
3566100 
3568 :80 
3578 108 
3578:00 
3588 :00 
3588 :00 
3598:08 
3598100 
35A8 180 
35A8 108 
35B0:00 
3588100 
358200 
35C8 188 
35D8 180 
35D8 :80 
35E6 :00 
35E8:EA 
35FO1FF 
35F8:FF 
3600 :00 
3608100 
3618:68 
3618:60 
3626:70 
3628:C1 
3630:5D 
3638:5A 
3646 :08 


F6 
00 
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3648 88 
3658 288 
365800 
3660 BO 
3668 :88 
3676 :08 
3678 :00 
3688 :03 
3688 00 
3698:EC 
3698:00 
36AG8 :CO 
36A8:DF 
36B0:2A 
36 B8 308 
3608 00 
36CB 308 
36D8 188 
36D8 00 
36EG 162 
36E8 200 
36F0 00 
36F8:0F 
3788 :82 
3708 :CO 
3710:AA 
3718 :AB 
3720:AB 
3728:60 
3730:B3 
3738:FF 
3740 3:62 
3748:CO 
3750:AA 
3758 :AB 
3760 :B0 
3768 :0A 
3770 :BF 
3778:C8 
3780:00 
378888 
3790:00 
3798 :08 
37A0 00 
37A8 :AB 
3788 206 
37B8 2068 
3708 308 
37C8 :08 
37D0:cO 
37D8 :AA 
37E0 00 
37E8 :FC 
37EO:FF 
37 F8 1008 
3800100 
3808 108 
3810:00 
3818 :88 
3820:AC 
3828 :08 
3830:00 
3838:5F 
3840:2A 
3848 :88 
3850 ::BO 
3858 :BA 
3860 100 
3868 :AA 
3870:FO 
3878:7C 
3880 :00 
3888 :08 
3898:0A 
3898 :00 
38A9 :0B 
38A8 :BC 
38B0:0A 
38B8:AA 
38C0:03 
38C8 68 
38D0:EC 
38D8 60 
38EO 00 
38E8 :FF 





00 
08 
oo 
55 
cl 
co 
OA 
80 
TF 
3F 
00 
00 
02 
oo 
20 
AC 
00 
86 
BO 
2A 
06 
BO 
OA 
co 
62 
60 
oo 
oo 
08 
00 
20 
88 
AA 
oo 
FO 
OA 
oo 
AB 
FD 
FO 
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38F0:3F 
38F8:FC 
3900 00 
3988 102 
3916 :00 
3918 08 
3920:00 
392888 
3930 :00 
3938:FF 
3940:AA 
3948 288 
3950 :B0 
3958 :82 
3960 108 
3968 :AB 
3970180 
3978100 
3980 100 
3988 :00 
3990:00 
3998 1:88 
39A0 :0B 
39A8 188 
39B0 300 
39B8:08 
390 100 
39C81C0 
39D0:AE 
39D8 100 
39EO:FO 
39E8:FD 
39FO:AF 
39F8:CO 
3A08 188 
3A08 0A 
3A10:00 
3A18:00 
3A20:04 
3A28 300 
3A30:00 
3A38:0F 
3A40:FE 
3A48:CO 
3ASO LAA 
3A58:CO 
3A68 :BO 
3A68:02 
3A7013F 
3A78:F8 
3AB0:60 
3A88 08 
3A90 208 
3A98 1:08 
3AAG 200 
3AAB 108 
3ABO 100 
3AB8 100 
3AC8 200 
3AC8 108 
3ADO 108 
3AD8 00 
3AEG 160 
3 AEB :CO 
3AFO:2B 
SAFES 208 
3BOO 100 
3 BOB 100 
3B10:28 
3B18:08 
3B20:AB 
3B26:2A 
3B30:15 
3B38:FF 
3B40 102 
3348 100 
3B50:FF 
3B58:0F 
3B60 :B4 
3B68 :AF 
3B70:FF 
3B78:FF 
3B80:00 
3 B88 100 
3890 00 


FF 
AT 
ao 
88 
86 
oo 
oo 
88 
00 
FF 
co 
AA 
oo 
AC 
oo 
oo 
2A 
FF 


oo 
oo 


3E 
08 


OA 


OA 
00 


00 
2o 











3BES :00 


3CE8 :0F 
3CFO :03 
3CF8:A9 
3D86:A9 
3D88 :A9 
3D10:A9 
3D18:AD 
3D20:FC 
3D28:C9 
3D36:3E 
3D38:A9 
3D40:C9 
3D48:3E 
3D58:3E 
3D58:18 
3D66 00 
3D68:4C 
3D70:AD 
3D78:4c 
3D88 :00 
3D88:3D 
3D96:D0 
3D98: DO 
3DAG :AD 
3DAB8:4C 
3DBO:EE 
3DB8:D8 
3DC8:81 
3DC8:Da 
3DDG :06 
3DD8 :4C 
3DEO:C5, 
3DE8 105 
3DFO:4C 
3DF8:4C 
3EOO:FO 
3E08:DC 
3E18:6C 
3E18:08 
3E26:6C 
3E28 382 
3E30:CA 
3E38 287 











3E40:ED 
3E48:6C 
3E56:98 
3E58 308 
3E60 :EE 
3E68 107 
3E70:64 
3E78:29 
3880248 
3E88:C9 
3E98 242 
3E98:20 
3EAG :A8 
3EAB FC 
3EBO:3D 
3EB8 01 
3ECO:85 
3EC8 07 
SEDO 160 
3ED8 :01 
3EEO:85 
3EE8:E7 
3EFO 360 
3EF8 :AD 
3FOO:F8 
3FO8 307 
3F10:A2 
3F18:CE 
3F20:F1 
3F28:D5 
3F30:3E 
3F38:3P 
3401268 
3F481FO 
3P5013E 
3F581FC 
3P60:07 
3F68:4C 
3F78 D0 
378 :EF 
3F86:D0 
3F88:0E 
3F96:D1 
3F98:FF 
3PAG:FF 
3FA813F 
3FBO:4C 
3 FBS: DO 
3FCO :DO 
3FC8:A0 
3EDO:B9 
3FD8:D2 
3FEO1C6 
3FEB8 :A2 
SFFO:A0 
3FF8:E4 
4000 :AD 
4008 :AD 
4010:4C 
4018164 
4020:08 
4028:18 
4030:3C 
4038122 
4040:AE 
4048 :0F 
4050 :07 
4058 :D4 
4960 :8D 
4068 :A9 
4076 :09 
4078244 
4080 :D4 
4088 :8D 
4090:A9 
4698 :A9 
4OAD D0 
40AB :A9 
40B0:DF 
4088 :B9 
40CO:F7 
40C8:D8 
49D0 :c8 
40D8 120 
4050 :20 





40E8 228 
40F0 :26 
40F8 20 
4100 :28 
4108 :20 
4116:298 
4118:97 
4129:20 
4128320 
4130:05 
4138:20 





4150:20 
4158220 
4160:05 
4168 :20 
4170320 
4178212 
4180:20 
4188 :20 
4190:20 
4198 220 
4100 :20 
4108 20 
4180 20 
4188 120 
4100120 
4108220 
41D0:20 
41D8 228 
41E0:20 
41E8:12 
41F0:49 
41 FB 292 
4200:20 
4208 120 
4210:20 
4218 :20 
4220:45 
4228:20 
4230:20 
4238120 
4240:20 
4248:20 
4250:20 
4258120 
4260 ::20 
4268 ::20 
4276 :20 
4278:30 
4280:92 
4288:D1 
4290:D1 
4298:D1 
4200112 
42A8 120 
4230 :96 
42B8 120 
4208328 
428220 
42D0:20 
4208 :43 
42E0 192 
42E8:92 
42F0:B7 
4268 :B7 
4300:DF 
4308::12 
431 





4328:D1 
4330:D1 
4338:D1 
4340:D1 
4348 92 
4350:12 
4358:9E 
4360::B7 
4368:87 
4370:B7 B7 
4378:92 9E 
4380:05 
4388 120 








4396:9E 
4398:1C 
43A9 208 
4308220 
43B0:12 
43B8:D1 
4300:20 
43C8:9E 
4300120 
43D8 120 
4380128 
43E8:92 
43F0:92 
43F8:12 
4480 :A9 
4408 1:20 
4410:20 
4418 :20 
4420:05 
4428 :20 
4430:A9 
4438 120 
4440:208 
4448 320 
4450105 
4458320 
4460120 
4468 :20 
4470328 2 
4478120 
4480:20 
4488 :20 
4490:28 
4498120 
4420120 
4408105 
4480120 
4488 220 
4400120 
44€8 120 
44D0 208 
448 20 
44E0 320 
44E8 :A9 
44F0:20 
44F8:20 
4500112 
4508 192 
4510:12 
4518128 
4526:47 
4528:41 
4530:20 
4538:92 
4540112 
4548320 
4550:20 
4558220 
4560320 
4568:05 
4570120 
457820 
4580:208 
4588 :28 
4590:20 
4598120 
4500 92 
4508345 
45B0:9C 
4588249 53 60 


Menu System 


(Article on page 74.) 


RK 16 DIM P$(20),L$(20),E$(20) 

18$ (20), R$ (20) :Q$=CHRS (3 

4):c$="," 

MS="INSERT DISK AND PRES 

S A KEY":GOSUB560 

S1$="5 DIMP$(26),L$(20), 

J$(26),S$(20),R$(26),ES( 

20)" 

SF 40 S2$="16 X=1:F$="+CHR$ (34 
) 


4E 


DM 20 


DE 30 
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PR 50 S2$=S2$+"{CLR}(22 DowWN]}S 


ELECT {HOME} " 


1" +CHRS (34) 
GC 86 S3$=S3$+" 








1"+CHRS$(34)+": 
)" 


34) 


HENES (N)=MS" 


‘TAB(4) 
PUT"+CHR$ (34) +" 


4)+"7K" 





EP 130 S6$="50 PRINT"+CHRS (34) 
+"(CLR} {3 DOWN }LOAD"+CH 
RS (34)+":0$7P$(K) 70S; ES 


(K) :IFS$(K)>" 


RP 146 S6$=S6$+CHRS (34)+"O"+CH 
R$ (34)+"THENPRINT"+CHRS$ 
(34)+"{4 DOWN}SYS"+CHRS 


(34) 


MD 150 S6$=S6$+";S$(K) :X=X+1" 
FD 168 S7$="60 IFRS$(K)="+CHRS ( 
34)+"Y"+CHRS (34) +"THENP 


RINT"+CHRS(34)+" 
(4 pow }RUN" 


KI 178 S7$=S7$+CHRS (34)+":X=X+ 
1: LFS$ (K)>"+CHRS (34)+"3 
"+CHRS (34)+"THENPRINT" 


RD 180 S7$=S7$+CHR$(34)+" 
{2 UP}RUN"+CHR$ (34) 


EXT: PRINT "+CHR$ (34) +" 
{HOME }" 

EP 200 S8$=S8$+CHRS (34) 

QF 210 PRINT"{CLR) {WHT} 


SYSTEM" 
KF 228 PRINT"{5 DOWN} 

{8 SPACES}{RVS} Fl 

{orF} 

Ee" 





ENU PILE” 


{RvS} F3 (OFF). 
ENU PILE" 





ENU PILE" 


(SPACE }MENU DRIVER" 


NGOSUB56 :GOTO39B 
GH 288 IFKS$=CHR$(137)THEN336 
AR 296 IFK$=CHR$(134)THEN396 
QQ 308 IFK$=CHR$(138)THEN360 
JF 310 IFK$=CHR$(135)THEN6OO 
AJ 328 GoTO270 


S,R" 





N) :NEXT 
QF 356 CLOSE2:GOTO396 


PP 368 GOSUBS76:OPEN2,8,2,"@6: 


-M,S,W" 


XP 370 FORN=1T02G:PRINT#2,P$(N 
)CSLS (N) CSES(N)CSS$(N)C 
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S3$="20 FORN=1T026:E$(N) 
Forres a omer (oe 


EJ 76 S3$=S3$+":NEXT:OPEN2,8,2 
M,S,R"+CHRS ( 
34)+":MS="+CHRS (34)+",8, 
S=CHRS (34 
JR 90 S4$="30 FORN=1T026:INPUT 

#2,P$(N),LS$(N),J$(N),S$( 

N), RS(N) : IFJ$(N)="+CHRS ( 
XA 160 S4$=S4S+"1"+CHRS(34)+"T 


MJ 116 S5$="40 NEXT:CLOSE2:PRI 
NTP$ :FORN=1T026 :PRINTN; 


HG 120 S5$=S5$+";P$(N) :NEXT:IN 


{7 RIGHT} {DOWN} "+CHRS$(3 


XB 199 S8$="70 FORZ=OTOX:B=631 
+Z:POKEB, 13 :POKE198,2Z:N 





{3 Down} {14 SPACES }MENU 


-CREATE MENU FIL 


PG 238 PRINT" {DOWN}[8 SPACES} 
{RVS} F2 [OFF}...LOAD M 


PG 248 PRINT" (DOWN}(8 SPACES) 
EDIT M 





CG 258 PRINT" (DOWN}(8 SPACES} 
{RvS} F4 [OFF}...SAVE M 


BR 260 PRINT" (DOWNJ(8 SPACES) 
{Rvs} F5 (OFF)...WRITE 


AJ 270 GETK$ :1FK$=CHR$ (133) THE 


MJ 330 GOSUB57@:OPEN2,8,2,"0:. 


CP 346 FORN=1T026:INPUT#2,P$(N 
),L$(N),ES(N),S$(N), RS( 


$RS(N)C$ :NEXT 
BC 386 CLOSE2:GOT0216 
XJ 398 PRINT"{CLR}(RVSJEDIT OP 
TION {DOWN }": FORN=1T09 :P 
RINTN;LEFT$(P$(N),16) :N 
EXT 
PRINT"1@ ";LEFT$(P$(10) 
216);"(10 UP)":FORN=11T 
020 :PRINTTAB(19)N; 
PC 410 PRINTLEFT$(P$(N),16):NE 
XT:PRINT" {DOWN} [(RVSJE 
{OFF} TO EDIT OR {RVSJR 
ETURN(OFF} FOR MENU" 


SQ 400 








CK 420 GETK$: IFK$=""THEN420 
SF 430 RS (13) THEN210 
BK 449 "E"THEN420 





EP 458 PRINT"(HOME}(13 DOWN) 

{39 SPACES} (UP}" 

INPUT"WHICH DIGIT TO ED 

IT";N$ :N=VAL(N$) :IFN<10 

RN> 26 THEN459 

INPUT" {DOWN JENTER PROGR 

AM NAME";PS$(N):P$(N)=LE 

FT$(PS$(N),35) 

INPUT" (DOWN JENTER BOOT 

{SPACE }NAME";L$(N) :L$(N 

)=LEFT$(L$(N), 16) 

BD 498 INPUT" (DOWNJENTER {RVS} 

1 {OFF} FOR 8,1 OR 

{RvS} @ [OFF] FOR ,8";E 

$(N) 

INPUT" {DOWN JENTER SYS# 

{SPACEJOR RETURN"; S$(N) 

IP S$(N)=CHR§(13)ORS$(N 

)=""THENS$(N)="_ ":GOTOS 

30 

IFS$(N)=""THENS$(N)="_" 

INPUT" {DOWN }RUN COMMAND 

NEEDED"; R$(N) :R$(N)=LE. 

Fr$((R$(N)),1) 

IFRS (N) <> "N"ANDR$(N) <>" 

Y"THENPRINT" {3 UP}":GOT 

0538 

KK 558 GOTO390 

AA 560 FORN=1T020:P$(N)="_":L$ 
(N)="_"rES(N)="_":S$(N) 
=" ":RS(N)=" ":NEXT:RET 
URN 

SM 578 PRINT"({CLR}(8 DOWN) 
{6 RIGHT} (RVS}";MS 

MF 580 GETK$:IFK$=""THEN588 

AP 598 RETURN 

EK 688 PRINT"(CLR)(3 DOWN)NEW 

{2 Down}" 

PRINTS 1$:PRINTS2$:PRINT 

S3$ :PRINTS4$ :PRINTS5$ :P 

RINTS6$ :PRINTS7$ :PRINTS 

8s 

CC 620 PRINT"SAVE"+CHRS(34)+"@ 
@ :MENU" +CHRS (34) +",8:SY 
$64738{HOME}" 

ME 630 FORZ=0TO16 :POKE631+Z,13 
:POKE198, Z+1 :NEXT: END 


Math Attack 


(Article on page 56.) 


EP 16 FOR 1=54272T054296 :POKEI 
1O:NEXT 

AH 20 POKE51,127:POKE52,62:POK 
E55,127:POKE56,62:CLR:GO 
T0490 

RB 3@ PRINT" {HOME)"; :FORC=1T02 
1 :PRINTC$ :NEXT: PRINT" 
{HOME J ": RETURN 

AP 48 C$="{39 SPACES}":PRINTCH 
R$ (142); CHRS(8) 

ER 58 PRINT"{CLR}{21 DOWN} 
{BLU} "; :POKE53280,0:POKE 
53281 ,6:V=53248 : POKE5428 
1,75 


MR 469 


EF 476 


JD 486 


MX 568 


JH 518 


SA 528 
MC 538 


SG 54! 








RR 6108 








QE 


BB 


FM 


MH 


GM 


EK 


DX 


FA 


cM 


sP 


FC 


68 POKE54296,15:F=54273:AD= 
F+4 :SR=F45 :W=F+3 :F2=F+7: 
W2=W+7 : POKEW+8 , @ : POKEW+9 
1248 

78 D$="{HOME}{24 DOWN}":TBS 
=D$+"(20 RIGHT)" 

86 PRINT"(3 SPACES}§P3E03 
(2 SPACESJEI9 £@] 

(2 SPACES}£03 E13 
(2_SPACES) R@JEPIEOIRTI 
EIZEOIEPIEGH{3 SPACES) 
KO3k@IEPI EPIEGIETI 
{2 SPACES} £@3" 

90 PRINT"(RVS}{RIGHT} £7] 
{2 SPACES} U3RY3 gua EY3 
Bui &Ti gUakTI(4 SPACES} 
&T9(4 SPACES) §UJEY3ETI 
{3 SPACES}—U3(3 SPACES} 
Eyagu3 " 

166 PRINT" (RVS} {RIGHT} 

(38 SPACES}":BC=PEEK(V+ 
31) 

116 PRINT" {HOME}{2 DOWN} 
{RIGHT}{PURJTYPE: {RVS} 
+{OFF} (ADDITION) " 

126 PRINT"(2 DOWN}{7 RIGHT} 

{RvS}-{OFF} (SUBTRACTIO 

N)" 

138 PRINT"{2 DOWN){7 RIGHT} 
{RVS}X{OFF} (MULTIPLICA 
TION)" 

140 GETTS$:IFT$<>"+"ANDT$<>" 
~"ANDT$<>"X"THEN148 

158 GOSUB30:DIMN(16,7):POKE 
56334, PEEK(56334)AND254 
3POKE1, PEEK(1)AND251 

168 CS=53632:FORX=0T09 :FORY 

=0T07 :N(X,Y)=PEEK(CS) :C 

=CS+1 :NEXTY ,X 

SN=-53449* (TS="X")-5359 

2*(TS="+")-53608* (TS="— 


176 


188 FORY=0TO7 :N(10,Y)=PEEK( 

SN) : SN=SN+1 :NEXT 

POKE1 , PEEK (1)OR4:POKES6 

334, PEEK(56334)OR1 

288 PRINT"{2 DOwWN){2 RIGHT} 
{YEL}LEVEL:(3 SPACES} 
{Rvs}1(6 RIGHT }2 
{6 RIGHTJ3" 

218 PRINT"({2 DOWN) (LIMITS) 
{3 SPACES}]9{5 SPACES}99 
(5 SPACES}99" 

220 PRINT"(9 SPACES)"T$" 9 
{4 SPACES}"TS" 9 
{4 SPACES} "T$"99" 

230 PRINT"(9 SPACES}£3 T3 
14 SPACES}E3 T! 
{4 SPACES}£3 T3" 

248 GETL$:IFL$<>"1"ANDL$<>" 
2"ANDLS$<>"3"THEN249 

258 L=VAL(L$) :L1=-9*(L=1)-9 
9*(L=2)-99* (L=3) :L2=-9* 
(L=1)-9*(L=2)-99*(L=3) 

268 GOSUB30:POKEV, 108 :POKEV 
42,175 :POKEV+4 , 250 : POKE 
V+1,@:POKEV+3 ,0 :POKEV+5 


198 


6 

FORX=16886T016191 :READD 
 POKEX, D:NEXT : POKEV+39, 
5 :POKEV+40, 3 :POKEV+41,8 
280 DATAD,6,0,8,0,0,0,8 
290 DATAG,0,8,6,0,0,0,0 
308 DATAG,8,8,16,0,0,74,08 
318 DATA2,82,64,2,74,64,2,8 


278 


2 

328 DATA64,17,36,136,9,36,1 
44,41 

330 DATA36,148,36,145,36,18 
7137,72 

348 DATA73,82,146,36,137,36 
718,82 








IG 


KS 


GB 


or 


AS 
cc 


RB 


PB 


ED 
gD 


350 
368 
378 
380 
3908 
400 
410 
420 
430 
440 
450 
460 
478 
480 
498 
588 
510 
520 
530 


540 


550 


560 
578 


580 


590 
600 
618 
620 
630 
640 
650 
668 


670 


680 


690 
700 


198 
720 
738 


740 
758 


DATA72,176,137,85,6,84, 
8,8 
DATAG,176,0,5,85,64,21, 
85 
DATA8G,42,170,168,85,85 
184,85 

DATAS5 ,84,85,85,84,42,1 
70,168 
DATA21,85,80,5,85,64,0, 
178 

DATAS,9,0,0,8,0,0,0 
DATA, 0,6,0,0,0,0,08 
DATAS,0,8,0,8,0,0,8 
DATAG,3,0,5,8,0,8,8 
DATA96 ,B,1,96,64,2,16,3 





5 
DATA4,15,144,24,10,126, 


48,4 
DATA173,96,4,30,18,70,3 
5,192 
DATAS3,65,72,36,129,40, 
28,129 
DATA72,28,129,192,36,2, 
66,124 
DATA162,98,162,120,80,5 
3,144,152 
DATAL,73,48,2,6,80,4,2 
DATA200,8,1,4,144,0,0,0 
FORX=16 1927016384 :POKEX 
19 :NEXT 

POKE204G, 253 :POKE2041,2 
54 :POKE2042,255 
FORSN=9TO2 :GOSUB1080 :NE 
XT :POKEV+21, 7 :POKEV+31, 
0 :GOSUB36 : POKE198 , 0 
¥(0)=0:¥(1)="30:¥(2)=10: 
PRINTD$ "ANSWERS: RP"; TA 
B(19);"BOMBS YOU MISSED 
2 BO"; 

FORX=OT02 :¥(X)=¥(X)+1:N 


EXT 

POKEV+1,¥(@) :POKEV+3 ,¥( 
1) sPOKEV+5,¥(2) :BC=PEEK 
(v+31) 

POKEW2, 17 :POKEF2,¥(@) :P 
OKEF2,¥(1) :POKEF2,¥(2): 
POKEW2 , 0 
FORD=8TO(L-1)* 
GETNS : IF (NS=>" 
"9" ) ORNS="="ORN$=CHRS (2 
)ORN$=CHR$ (13) THEN700 
BC=PEEK (V+31)AND7 :1FBC= 
OTHENS 69 

IF (BCAND1 )=1THENSN=@ :GO 
SUB660 

IF (BCAND2 )=2THENSN=1 :GO 
SUB660 

IF (BCAND4 )=4THENSN=2 :GO 
SUB669 

GOTOS68 

BH=BH+1 :POKEV+1+SN* 2,22 
1 :POKE2040+SN , 250 :POKEW 
,@POKEAD , 12: POKEF , 1 
POKEW, 129 :FORD=1 T0100 :N 
EXT: POKEW, 0 :POKEW, 129:P. 
OKE2040+SN ,251:FORD=1TO 
108 

NEXT :GOSUB1@80 :PRINTTBS 
+ TAB (36)BH; :¥(SN)=30:1F 
BH> 2THENG9O 
POKE2040+SN,253+SN:RETU 
RN 

IEN$=CHRS ( 20) ANDTB> OTHE 
NTB=TB-1 :PRINT" 

(2 LEFT} &P9(LEFT)"; :AN$ 
=LEFTS (ANS , LEN(ANS$) ~1) 
IENS$=CHRS ( 20) THEN6 10 
IENS$<>"="THEN750 
IFTB=OTHENTB=1 :AN$="—": 
PRINTLEFTS$ (TBS, 33) 
(LEFT }" 
Goro61¢8 
IFN$=CHR§ (13) THEN780 

















KD 


Pg 
QB 


xQ 


MM 


GK 
QR 


760 IFTB<4THENPRINTLEFTS (TB 
$,33+TB) ;NS;"EPA(LEFT}" 
7 *TB=TB+1 :ANS=ANS+N$ 

778 GoTo618 

780 AN=VAL(ANS$) :PRINTD$;" 
(8 RIGHT)§PA{6 SPACES} 
7 tANS="":TB=O 

798 CF=@:FORXX=@TO2 s:IFA(XX) 
=ANANDY ( XX) <221 THENGOSU 
B860 

800 NEXT: IFTC>=26THEN1 O90 

816 IFCF>@THEN85O 

820 WT=WT+1 :FORX=0T02 :¥(X)= 
¥(X)+(3-L) #10 :1FY(X)>20 
OTHENY(X)=200 

830 NEXT:L=L-1 :POKEW, 0 :POKE 
AD, 0 :POKESR, 248 

840 POKEW, 17 :FORD=255T0100S 
TEP-2 :POKEF, D :NEXT: POKE 
W,@:POKESR, 0 

858 Goro616 

868 TC=TC+1 :AT=AT+1 :POKE204 

O+XX , 252 1SN=XX:POKEW, 0: 

POKEAD , 144 : POKEF , 258 

POKEW, 129 :FORD=1T0168 :N 

EXT s POKE2040+XX ,253+XXt 

GOSUB1OB@ t¥ (XX)=30:CF=1 

BC= PEEK (V+31) : RETURN 

POKEV+1,6 :POKEV+3 ,0 :POK 

EV+5 0 

PRINT" (CLR}{3 DOWN} 

{5 RIGHT] {RED}MATH PROB 

LEMS INVADE THE CITY":G 

070938 

PRINT" (CLR} {3 DOWN} 

(5 RIGHT) (RED) YOU'VE BE 

ATEN THE MATH PROBLEMS" 

PRINT" (2 DOWN)(3 RIGHT} 

{9 RIGHTJAT THEIR OWN 

{SPACE }GAME" 

PRINT"(2 DOWN}{3 RIGHT) 

R63GAME RESULTS: ":PRINT 

"(DOWN) 14 RIGHT) (GRN}RI 

GHT ANSWERS: "AT 

940 PRINT" (DOWN) [6 RIGHT} 
(PURJWRONG ANSWERS: "WT 

950 PRINT" (DOWN}(8 RIGHT} 
B19BOMBS REACHING THE C 
ITY: "BH 

969 PRINT"(3 DOWN)E73 
{3 RIGHT}DO YOU WANT AN 


OTHER CHANCE? (Y¥/N)?" 
970 GETCS :1FC§<>"Y"ANDC$ <>" 


N"THEN970 
980 IFCS="Y"THENRUN 
998 PRINT" (CLR)§79";sPOKES3 
280,14 :POKES3281 , 6 :POKE 
V+21,0:END 
1000 FORX=6T02 :¥ (X)=0:POKEV 
4142*X, 0 :NEXT: IFL1+L2> 
1@0OTHENS1G 
1016 PRINT" ({HOME}(3 DOWN) 
(6 RIGHT} {PUR} "TC"CORR 
ECT ANSWERS": TC=0 
1620 PRINT"B39 {DOWN} 
(3 RIGHT} YoU MAY GO ON 





878 


880 
898 


988 


910 
920 


930 


1030 PRINT" {DOWN} {4 RIGHT) 

{17 SPACES)TO THE NEXT 
LEVEL" 

1048 L1$=STR§(L1):L2$=STRS( 
L2) :1FL2<L1THENL2$=L2$ 
+"9" :GOTO1968 

1650 L1$=L1$+"9" 

1060 L1=VAL(L1$) :L2=VAL(L2$ 
):PRINT"(2 DOWN} 

{4 RIGHT} {YEL}YOUR NEW 
LIMITS ARE: "L1"AND"L 
2 

1870 GoTos30 

1888 US=STR$(INT(RND(6)*L1) 
) :BS=STR$ (INT ( RND(O) *L 
2)) sB$=RIGHTS (BS ,2) 





Qk 


BA 


XM 


1998 
1108 
1116 
1126 


1136 


1148 


1158 


1160 
1178 


1188 
1198 


1208 
1210 


1226 


IFT$="X"THENA (SN) =VAL( 
U$)*VAL(BS) 
IFT$="+"THENA (SN)=VAL( 
U$)+VAL(B$) 
IFT$="~-"THENA (SN)=VAL( 
US$)-VAL(B$) 

BS=T$+B$ :U$=RIGHTS (US, 
3) :SY=SN* 2+1+V:TFLEN(U 
§)=2THENUS="_"+U$ 
8S=(SN+253)*64 :POKEW2, 
@ :POKEW2 ,65 :FORY=OT021 
C1$=MID$(U$,Y+1,1) 
FORX=0T07 : POKESS+X* 3+Y 
+N(VAL(C1$),X) sIFC1$=C 
HR$ (32) THENPOKESS+X*3+ 
Y,0 

POKESY , ABS ( PEEK (SY) ~3) 
tPOKEF2 , 188-10*X:NEXTX 
¥ 
FORY=0TO2 :C1 $=MID$(B$, 
Y+1,1) sFORX=8T015 
POKESS+X* 3+Y ,N(VAL(C1$ 
),X-8) sPOKEF2,10*X:POK 
ESY , ABS(PEEK(SY)-3) 
IFC1$=" "THENPOKESS+X* 
34+¥,08 

IFC] §=T$THENPOKESS+X* 3 
+¥,N(10,X-8) 
NEX'TX ,¥ :POKEW2 , 8 
POKESS+48 , 255 :POKESS+4 
9,255 :POKESS+50, 255 
FORX=SS+51TOSS+62 :POKE 
X,@ sNEXT: RETURN 


Sequential File 
Converter For 
SpeedScript 


See instructions in article on page 


76 before typing in. 
4 


0801:25 
9809: 37 
0811:37 
0819:37 
6821137 
9829199 
9831:31 
839:20 
9841149 
9849108 
0851:41 
0859154 
0861120 
8869: 27 
0871:4E 
0879:20 
9881:00 
9889: 29 
9891 :22 
9899:4D 
O8A1:4F 
OBA9:2E 
@8B1:c4 
98B9:53 
@8C1 152 
9809 : 26 
98p1:28 
98D9:97 
98E1:28 
OBE9:AA 
O8F1:00 
O8F9:50 
6991 :4E 
9909:54 
9911:26 
0919:27 
9921:3A 
9929:09 
9931:4E 
8939: 20 
0941:4E 
9949354 
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@8 6 
31 
33 
33 
35 
22 
32 
43 
4P 
78 
53 
20 
50 
53 
al 
53 
8B 
BL 
54 
45 
20 
22 
08 
4E 
22 
49 
53 
20 
cA 
31 
28 
4c 
50 
49 
50 
53 
85 
AA 
24 
99 
4. 
4P 
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9951:2E 
8959:30 
9961:24 
9969:50 
9971 :08 
0979:20 
9981:31 
9989:2C 
9991:2c 
9999:3A 
O9A1:20 
O9A9:24 
@9B1:4C 
O9B9:AA 
@9C1:31 
@9C9:A8 
99D1:A9 
99D9:A9 
OIEL:A2 
O9E9 82 
O9F1:CO 
O9F9:0A 
OAG1:A8 
GA09 :00 
®A11L:A9 
OA19: D2 
OA21:C6 
6A29:90 
@A31:C9 
@A39:C9 
@A41:C9 
GA49:38 
@A51:BO 
@A59:C9 
@AG1:0A 
9A69:4C 
@A71:5E 
OA79:A2 
@AB1 :D2 
GA89 208 
@A9L:A9 
9A99 360 
OAAL:44 
OAA9:4F 
@ABL :30 
BABI: 49 
@AC1L 352 
@AC9:308 





2E 
26 
B2 
2c 
81 
3 
3A 
cé 
49 
82 
53 
29 
2c 
32 
oo 
20 
OA 
Or 
9A 
A2 
FF 
20 
20 
85 
@1 
FF 
FF 
84 
aD 
20 
40 
59 
66 
AD 
co 
17 
Do 
03 
FF 
FO 
03 
30 
49 
52 
3A 
53 
54 
08 


Mastering Sound & 
Music On The 128 


(Article on page 78.) 
Program 1: The Magic Flute 


FR 
AA 
HH 


ag 


HE 


QR 


HQ 


aK 





114 


26 
30 


40 


50 


60 


70 


80 


968 


MR 16 VOL 8:TEMPO 13:PLAY"X0U9 


"2A$="V1051GIFQEV204QGV3 
Qcacv2aGVv1 05QEQRQE" 
BS$="V105QFV204QGV303QB0B 
v204QGV105QFQRIFIE"” 
C$="V105QDV204QGV3030BQB 
v204QGV105QD0RQD" 
DS="V1OSHEV204QGV3QCaCcv2 
QGV1QROSIGIF":ES="V105HE 
V204HGV3HCHCV2HGV105QEQE 


FS§="V105 .QFV204WAV3WFV1O 
5IGQAQF":G$="V1O5QEV204H 
GV105QEQDV204HGV105QD" 

H§="V1O5HCV204QCQEQCV1OR 


FOR T=6 TO 9:PRINT USING 
"{CLR}{7 Down) (TAB) 
(LEFT }THIS IS ENVELOPE N 
UMBER #";T 

READ EN$(T):PRINT USING" 
{7 Down} (TAB}(5 SPACES}# 
##22422222222";ENS(T);:T 
S=STRS$(T) 





PLAY"VIT":PLAY TS:PLAY"V 
27": :PLAY"V3T":PL 
AY TS 
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GK 160 PLAY AS$:PLAY B$:PLAY C$ 


BK 110 


PLAY D$:PLAY E$:PLAY F 
$:PLAY G$:PLAY H$:NEXT: 
END 

DATA "{3 SPACES }PIANO", 
" ACCORDION", " 

{2 SPACES }CALLIOPE", “ 
{4 SPACES) DRU 
{3 SPACES ]FLUTE", 
{3 SPACES ]GUITAR", "HARP 
SICHORD", "(3 SPACES JORG 
AN", "(2 SPACES} TRUMPET" 
" XYLOPHONE" 





Program 2: American Patrol 


gD 


RE 


xo 


KG 


DP 


DD 





PX 


Js 


BB 


10 PRINT" (CLR}(5 DOWN) (TAB) 
{4 SPACES]AMERICAN PATRO 
L"sPRINT"(5 DOWN) (2 TAB) 
{3 SPACES]BY":PRINT" 

{5 Down} (TAB) {5 SPACES}F 
+ W. MEACHAM" 

20 TEMPO 20:VOL 8:PLAY"X@U9 
": PUS="V104 IASBOSS#C" 

30 PLAY" VLT2V2T2V3T2":REM * 


48 A$="V105,1DV303QD04S¢FV2 
SAV105 . IDV2SRO4SAV3S#FSR 


58 BS="V303QAV105 IDI #CIDV20 
4QAV3Q#FVIOSIE" 

68 C$="V105 .1#FV303QD04S#FV 
2SAV105 . I #FV2SRO4SAV3S#P 
SR" 

70 D$="V303QAV1051#FIFI#FV3 
04Q#FV2QAV105 1G" 

88 ES="V105.IAV303QD04S#FV2 
SAV105 « IAV2SRO4SAV3S#PSR 


90 F$="V303QAV105IAI#GIAV30 

4Q#FV2QAV1061D"t 

100 GS="V105HAV303QD0¢FV204 
SASRSASR":H$="V2QRV303Q 
GQ#FV204QAV105.1#F" 

110 I$="V303QAV105 .1GV3040¢ 
CV2QGVLOSIGI#E":I$="V10 
5. TEV303QE04Q#CV2QGV105 
-IG" 

128 K$="V3030DV105 .1#FV304Q 
#PV2QAVIOSI#FIE":L$="V1 
05 . IDV303QA040# FV2QAV10 
5.1#F" 

130 M$="V304IEV105 .IEV3041¢ 
FIEV2Q#GV1.IBV3ID":NS$=" 
V304Q#CV105 . 1#CV303QBV2 
04Q#GV105.1D" 

149 O$="V303IAVLOSHEV303 IBI 
AV204QGV3031G":P$="V303 
Q#FQEV204QGV104 TASBOSS# 


158 WS="V105HAV303.IDSRO3QD 
V204QA":X$="V303QEQ#FV2 
O4QAV105 .1¢F" 

168 Y$="V303QGV105.IBSR.IAV 
304 SDV2SBSRSBV3SDSR": Z$ 
="V303QDV105 . IGV304QGV2 
QBV105.1¢F" 

'V303QEV105 .IESR.ID 

V304S#GV2SBSRSBV3S#GSR" 

BS="V303Q#GV105 .I1#CSR 
+ IDV304QEV2QB" 

189 ACS="V303QAV105QEI#FV30 
4Q#CV20EV1051G":AD$="V1 
05. 1#FV302QA04Q#CV2Q6V1 
05.1" 

198 AES="V303QDV105 . IDv304Q 
DV2Q#FV1IAIB":AF$="V105 
I#CV303QAV105 IDIEV304QD 
V2Q#FV105I#F" 

208 AGS="V105 .IGV303QA04S#C 
V2SEV105 . IGV2SRO4SEV3S# 
CSR" 

216 AHS$="V303QEV105 .1GV304Q 








XM 


DA 


SR 


BK 


JB 


HR 


MF 


AC 


cE 


JG 


MQ 


BK 


BE 


BE 


226 


230 


240 


258 


268 
278 


288 


2968 


308 


310 


320 


338 


348 


3508 


368 


378 


388 


398 


400 


4168 


#CV2QEV105.1G" 
AIS$="V303QAV1051GI $FHGV 
304S#CV2SESRSEV3S#CSR": 
AJ$="V303QE04Q#CV2QAV10 
5Q#G" 

AK$="V105 . IAV303QD04SDV 
2S#FV105 . IAV2SRO4S#FV3S 
DSR" 
ALS="V303QAV1OS5IAIGI#FV 
304QDV2QAV105 1G": AMS$="V 
1OSHAV303QD04SDV2S#FSRS 
#FV3SDSR":ANS$="V303Q#FO 
4QDV2QAV1050#F" 
AV$="V303Q#¢FO4QDV2QAV10 
5QA":AWS="V105 . IBV303QG 
04SDV2SGV105 . IBV2SRO4SG 
V3SDSR" 

AX$="V302QBV106 .QDV304Q 
DVv2QGV1051B" 

AY$="V105 . IAV303QD04SDV 
2S#FV105 . IAV2SRO4S#FV3S 
DSR" :AZ$="V303QAV1O5 IAI 
G.1#FV304QDV20A" 
BA$="V303Q#FV105 .1GV304 
SEV2S#AV105 . IGV2SRO4S#A, 
V3SESR" 

BB$="V303Q#CV105 .1#CV30 
4Q#FV2Q#AV105 .1G":BC$=" 
V302QBV105 . 1#FV304SDV2S 
BV105 .I#FV2SRO4SBV3SDSR 


BD$="V3030#FV1OSI#FIE.I 
DV3040#FV2QBV1SR": BHS=" 
V303Q#FV105 IAIG.1#FV304 
QDv2QA" 

BI$="V303QAV105 .IGV3048 
#CV2SEV105 . IGV2SRO4SEV3 
S#CSR" 

BJ$="V303QEV105 .1#CV304 
Q#CV2QAV105 .. IE": BKS="V3 
O3QDV1OS . IDV304S#FV2SAV 
105 . IDV2SRO4SAV3S#FSR" 
BL$="V303QAV204Q#FV105. 
IDSRS#FSRS# FSR": BM$="V1 
O5W#PV3QRO3I#FV20408A"1 
BNS="V204QBV303I#GIRI#A 
v20sqec" 
BO$="V205QDV303IBV1QROS 
IDI#C": BP§$="V1OSIDIEI#P 
IG":BQ$="V105WAV3QRO3IA 
v205Q¢C" 
BR$="V2050DV303IBIRO4I1# 
CV205QE": BS$="V205Q#FV3 
O4IDV1QROSI#FIFE":BT$=" 
V1051#FI#GIAIB" 
BUS="V106WECV3QRO4I1#CV2 
O5Q#E": BVS="V205Q#FV304 
I#DIRI#EV2050#G":BWS$="V 
205QAV3 041#FV1QROSIAI#G 


BX$="V105 IAIBO6I#¢CID":B 
Y$="V106WEV3QRO4S#GV206 
SDSRSDV304S#GSR":BZS="V 
3041#GV206 IDIRIDV30418G 
IR" 

CA$="V304 IAV206Q$CV10EQ 
R“:CB$="V102QAV3HAV2HA™ 
+CC$="V303 IAV1OSIDV204I 
#PIRI#FV105IDV303I1AIR": 
CD$="V303 IAV2041#FV105I 
D" 

FOR R=1T02:PLAY PU$:PLA 
Y AS:PLAY B$:PLAY C$:PL 
AY D$sPLAY E$:PLAY F$:P 
LAY G$:PLAY H$ 

PLAY I$:PLAY J$:PLAY K$ 
:PLAY L$:PLAY M$:PLAY N 
$:PLAY O$:PLAY P$:Q$=A$ 
2 RS=B$ : S$=C$ :TS=D$ 
PLAY QS$:PLAY Ri 
sPLAY T$:U$=E$:V: 
AY US:PLAY V$:PLAY WS$:P 
LAY X$:PLAY Y$:PLAY Z$: 














PP 


PE 


CF 


pe 


GG 


HB 


420 


430 


440 


450 


468 


470 


488 


PLAY AA$:PLAY ABS 

PLAY AC$:PLAY AD$:PLAY 

{SPACE JAE$:PLAY AF$:PLA 
Y AG$:PLAY AH$:PLAY AI$ 
:PLAY AJ$:PLAY AKS:PLAY 
AL§:PLAY AM$:PLAY ANS 

AOS=AG$ :APS=AH$ :AQS=AIS$ 
tAR$™AJ$:PLAY AOS :PLAY 

(SPACE JAP$:PLAY AQ$:PLA 
¥ AR$ :AS$=AKS$ :ATS=ALS:A 
US=AMS$ 

PLAY AS$:PLAY AT$:PLAY 

(SPACE JAU$:PLAY AV$:PLA 
Y¥ AWS$:PLAY AX$:PLAY AYS 
+PLAY AZ$:PLAY BAS$:PLAY 
BB$:PLAY BC$:PLAY BD$ 

BE$=AWS : BFS=AX$ : BGS=AY$ 
+PLAY BE$:PLAY BFS :PLAY 
BG$:PLAY BH$:PLAY BI$: 
PLAY BU$:IF R=2 THEN48O 


PLAY BK$:PLAY BL$:PLAY 
{SPACE JBM$ :PLAY BN$:PLA 
Y BO$:PLAY BP$:PLAY BQ$ 
:PLAY BR$:PLAY BS$:PLAY 
BT$ 

PLAY BU$:PLAY BV$:PLAY 
(SPACE JBWS:PLAY BX$:PLA 
Y BY$:PLAY BZ$:PLAY CAS 
:VOL 15:PLAY CB$:VOL 8 
NEXT R:PLAY CC$:PLAY CD 
$:END 


Machine Language 


For Beginners 


(Article on page 87.) 


CC 1@ H=0:REM IF H = @ THEN AS 
SEMBLY IS IN DECIMAL 

FJ 50 HE$="0123456789ABCDEF":S 
Z=1:Z0$="000" 


JD 


AC 
HM 


100 


118 
120 
122 
124 
126 
146 
158 
155 
168 
165 
170 
175 
177 
179 
180 
185 
189 
190 


195 
208 


PRINT" (3 SPACES }SIMPLE 
{3 SPACES }ASSEMBLER 

{2 SPACES }CONVENTIONS:" 
DIMMS (56), TY(56),OP(56) 
FORI=1T056 : READMS (I) 
ROP$=MID$(M§$(I),4,1):TY 
(1)=VAL(ROPS$) 
OP$=RIGHTS (M$(I),3) :OP( 
1)=VAL(OP$) 

MS (I)=LEFT$(M$(I),3) 
NEXTI: PRINT 

PRINT "IMMEDIATE 

{5 SPACESJLDA #15 

PRINT "ABSOLUTE 

{6 SPACES}LDA 1500 
PRINT"ZERO PAGE 

{5 SPACES}LDA 15 

PRINT "ACCUMULATOR 

{3 SPACES JASL 

PRINT "INDIRECT X 

{4 SPACES}LDA (15x) 
PRINT"INDIRECT Y 

{4 SPACES}LDA (15)¥ 
PRINT "ZERO PAGE X 

{3 SPACES}LDA 15X 
PRINT"ZERO PAGE Y 

13 SPACES)LDX 15Y 

PRINT "ABSOLUTE X 

{4 SPACES}LDA 1500x 
PRINT "ABSOLUTE Y 

{4 SPACES}LDA 1500¥ 
PRINT: PRINT" (4 SPACESJE 
NTER ALL NUMBERS IN "; 
IFH=1 THENPRINT"HEX":GO 
70200 

PRINT "DECIMAL" 
PRINT:PRINT"PLEASE INPU 
T STARTING ADDRESS FOR 
(SPACE ]ML PROGRAM": INPU 
T SAS 





KH 


DB 


XK 


210 


215 
228 


238 
235 
248 
241 
242 
24, 


co 


244 


245 


250 


268 
278 
280 
298 
388 


381 
305 


316 
328 


330 
348 
350 
368 
370 
380 
398 
400 
410 
420 
430 
440 
450 
460 
4708 
480 
490 
500 


510 
520 


538 


540 
558 


560 
578 
580 


IFH=1 THENH$=SA$ :GOSUB50 
00 :SA=DE:GOTO220 
SA=VAL(SAS) 

TA=SA: PRINT" (CLR]":REM 
(SPACE JCLEAR THE SCREEN 
IFH=1THENDE=SA: SZ=3 :GOS 
UB4000 :PRINTHS ; :GOTO240 
PRINTSA" "; 
INPUTMNS : PRINT" (UP} "SPC 
(20);2REM GO UP ONE LIN 
E AND OVER 20 SPACES 
REM ADD NEW PSEUDO-OPS 
{SPACE} HERE 

IERIGHTS (MN$,7)="FORWAR 
D"THENPB=SA 

IFRIGHTS (MN§,7)="RESOLV 
E"THENFR=SA~FB: POKEFB+1 
+PR-2:PRINT"(2 SPACES JO 
K"1GOT0230 

IFRIGHTS (MNS, 4)="POKE"T 
HENPRINT "ADDR, NUMBER (DE. 
Cc)"; 

IFRIGHTS (MN$,4)="POKE"T 
HENINPUTADR , NUM: POKEADR, 
+NUM:GOTO230 
IFMNS$="END"THENPRINT : PR 
INT"(6 SPACES}PROGRAM I 
S FROM"TA"TO"SA:END 
L=LEN (MN$) :L$=LEFT$ (MNS 








13 
FORI=1T056 : IFL$=M$ (I) TH 
EN3008 

NEXTI 

GoTos8sa8 

REM PRIMARY OPCODE CATE 
GORIES 
TY=TY (I) :OP=OP(I) 
IFFB=SATHENTN=@ :GOTO201 
C) 

IFTY=0 THENGOTO1008 
IFTY=3THENTY=1 : 1FL=3THE 
NOP=OP+8 :GOTO1008 
R$=RIGHTS (MN$ ,L-4) : 1FH= 
L' THENGOSUB6080 
LR$=LEFT$(R$,1) :LL=LEN( 
RS) : IFLRS="¢"THEN480 
IFLRS§="( "THENS20 
IFTY=BTHENGOO 
IFTY=3THENOP=0P +8 :GOTOL 
909 

IFRIGHTS$ (R$,1)="X"ORRIG 
HTS(RS$,1 "“THENG 30 
IFLEFT$(L$,1)="J"THEN82 











0 

TN=VAL( R$) :1 FTN? 255THEN 
430 
IFTY=1ORTY=30RTY=40RTY= 
5THENOP=OP +4 

Goro2080 
H8=TN/256:L¢=TN-256*H8: 
IFTY=2ORTY=7THENOP=OP +8 
:GOTO470 
IFTY=1ORTY=30RTY=40RTY= 
5THENOP=0P+12 :GOT0470 
IPTY=6ORTY=9THEN4 70 
GoTO85o 

GoTO3900 

TN=VAL( RIGHTS (R$ ,LL=1)) 
IPTY=1THENOP=OP+8 :GOTO2 
000 

IFTY=40RTY=5 THENGOTO200 
0 


Gorosso 
IFRIGHTS (R$ ,2)=")¥"THEN 
) 


54 

IFRIGHTS$(R$,2)="X) "THEN 
570 
TN=VAL(MID$(R$,2,LL-3) ) 
IPTY=1THENOP=O0P+16 :GOTO 
2000 

GoToss5a 
TN=VAL(MID$(R$,2,LL~3)) 
IFTY=1THENGOTO2000 





DA 
cD 


590 
600 


610 
620 
630 
640 


650 
660 


670 
675 
680 
690 
7008 
718 
720 
730 
740 
758 
760 
778 
780 
798 
860 
810 
820 
838 
840 
858 
1680 
1610 


1020 
1638 


2008 
2005 


2010 


2028 
2830 


2040 
3008 
30108 
3828 
30638 
3040 
3050 
4000 
4010 


4020 
5000 


Gorossa 

TN=VAL(R§ ) : TN=TN-SA~-2:1 
FIN¢-128ORTN> 127THENP RI 
NT"TOO FAR "; :GOTO85O 
IFTN<OTHENTN=TN+256 
Goro2000 
IFRIGHT$(R$,2)=")Y"THEN 
540 


IPRIGHTS (R$, 1)="X"THEN? 
20 


REM *ZERO Y 
TNeVAL(LEFT$ (R$ ,LL-1)): 
IPTN> 255THENG8O 
IFTY=2ORTY=5 THEN7 30 
IFTY=1THEN760 
GOSUB770 : I FTY=1THENOP=O 
P+24:GOTO710 

IETY=5 THENOP=OP +28 :GOTO 
710 

Gorosse 

Goro3000 
TN=VAL(LEFT$(R$,LL-1)) = 
IFTN> 255 THENGOSUB7 76 :GO 
T0780 
IFTY=2THENOP=O0P+16 :GOTO 
760 
IFTY=1ORTY=30RTY=5 THENO 
P=OP+26 :GOT0760 
Gorosso 

Goro2000 

H8=TN/256 :L8=TN-256*H3: 
RETURN 
IPTY=2THENOP=OP +24 :GOTO 
810 
IPTY=10RTY=30RTY=5 THENO 
P=OP+28 :GOTOB10 
Gorosso 

Goro3999 

TN=VAL( R$) 

GOSUB778 

GOTO710 

PRINT"{RVS} ERROR “:GOT 
0236 

REM 1 BYTE INSTRUCTION 
8 
POKESA, OP :SA=SA+1:IFH= 
1THEN 1030 

PRINTOP :GOT0230 

DE = OP :GOSUB40G0 :PRIN 
THS :GOTO230 

REM 2 BYTE INSTRUCTION 


s 

IPTN> 255THENPRINT" INC 
ORRECT ARGUMENT.":GOTO 
230 
POKESA, OP :POKESA+1 , TN 
SA=SA+2:1FH=1THEN2030 
PRINTOP; TN:GOTO230 

DE = OP :GOSUB4606:PRIN 
THS" "; 

DE = TN:GOSUB4000:PRIN 
TH$ :GOTO230 

REM 3 BYTE INSTRUCTION 
8 


POKESA, OP :POKESA+1,L®: 
POKESA+2,H®:SA=SA+3:1F 
H=1 THEN3030 
PRINTOP; L& ;H% :GOTO230 
DE = OP :GOSUB4000 :PRIN 
THS" " 
DE = L%:GOSUB4000:PRIN 
THS" "; 

DE = H%:GOSUB4000:PRIN 
HS :GOr0230 

REM(2 SPACES JDECIMAL T 
O HEX (DE TO HS) 
H$="": FORM=SZTOOSTEP=1 
:N®=DE/ (161M) :DE=DE-Nt 
*16 TM: H$=HS+MIDS (HES ,N 
%+1,1) 
NEXT: SZ=1 :RETURN 

REM(2 SPACES}HEX TO DE 
CIMAL (H$ TO DE) 
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DD 5610 D=0 :Q=3:FORM=1T04 :FORW 
=0TO15 :1FMID$ (HS ,M,1)= 


MIDS (HES ,W+1,1)THEN593 
a 


5020 
5030 


NEXTW 
D1=W*(161(Q)) :D=D+D1:Q 
=Q-1:NEXTM: DESINT(D) :R 
ETURN 

REM ACCEPT HEX OPCODE 
(SPACE J INPUT AND TRANS 
LATE IT TO DECIMAL 
IFLEFTS$ (R$,1)="#"THENH 
$="G0"+RIGHTS$ (R$,2):GO 
SUB5000 : RS="#"+STRS$ (DE 
) RETURN 

LS=LEN (R$) :AZS=LEFT$(R 
$,1) #ZA$=MID$(RS$,LS,1) 
rIFAZ$ <>" ("THEN6O58 
IFZAS ="Y"THENHS ="60"+M 
ID$(R$,2,2) :GOSUB5000: 
R§="("+STRS(DE)+")¥":R 
ETURN 

IFZA$=") "THENH$="@6"+M 
ID$(R$,2,2) ;GOSUB5000: 
RS="("+STR§ (DE) +"X)"2R 
ETURN 

IPZA$="X"ORZAS$ ="¥"THEN 
6070 
HSSLEFTS (Z0$ ,4-LS)+R§¢ 
GOSUB5000 :R$=STR$ (DE): 
RETURN 

IFLS=5 THENH$=LEFT$ (R$, 
4) :GoTo6 e908 
H$="00"+LEFTS (R$ ,2) 
GOSUBS000:R$=STRS (DE) + 
ZA$ sRETURN 

20088 DATAADC1@97 ,AND1033,A 
SL3082,BCCB144,BCSB17 
6, BEQ8240,BIT7036 , BMI 
8048 
DATABNE8208 , BPL8016 ,B 
RK@OOO , BVC8OBO, BVSB11 
2,CLC6024 ,CLD®216 ,CLI 
6088 

DATACLVO184 ,CMP1193,C 
PX4224,CPY4192,DEC219 
8, DEX0262 , DEYO136,EOR 
1065 

DATAINC2230, INXO232,1 
NYO200 ,JMP6876 ,JSR9G3 
2,LDA1161,LDX5162,LDY 
5160 
DATALSR3066 , NOPO234,0 
RA1G01, PHAQO72, PHPOOO 
8, PLAG104, PLPOO48, ROL, 
3034 

DATAROR3098, RT1O064,R 
188096 ,SBC1225 ,SECOOS 
6, SEDO248 ,SEIO120,STA 
1129 
DATASTX2134,STY2132,T 
AXO170 , TAYS168 , TSX618 
6, TXAG138 , TXS0154, TYA 
0152 


Power BASIC: Line 


Count 
(Article on page 80.) 


Program 1: Line Count—64 


Version 

MS 16 FORA=49152T049539:READB: 
POKEA, B:C=C+B:NEXT 
IFC<>51719THENPRINT" 
{CLRJDATA ERROR": STOP 
PRINT "(CLR}{2 DOWN} 
(WHT}SYS 49155: TO INITI 
ALIZE":PRINT "{DOWN]SYS 
{SPACE}49152: FOR A REPO 
RT" 

MM 40 DATA 76,13,193,32,41,192 


6000 


6019 


JB 60206 


QX 6038 


MB 60408 


KF 6050 


KS 6060 


KF 6878 


AC 
GE 


6088 
6090 


FR 


BK 


20018 


ES 


20020 


KR 


20838 


DP 


20040 


20058 


DR 20060 


PH 206 
MI 30 
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58 


Jc 68 


PP 78 


MB 86 


KF 


GP 120" 


JQ 116 


EK 120 


XH 138 


cP 


148 


158 


166 


KA 


170 


186 


JA 


190 


208 


216 


BB 228 


EM 230 


AP 249 


,162,14,168,0,169,255,14 
5,251,136, 208,251,238,25 
2 


DATA 262,208,246,169,56, 
141,8,3,169,192,141,9,3, 
169, 255,141,129,193,141 
DATA 138,193,96,169,0,13 
3,251,169,194,133,252,96 
32,41,192,165,58,201,25 
5 

DATA 248,98,205,130,193, 
208,7,165,57,205,129,193 
,248,86,160,1,185,57,0 
DATA 153,129,193,136,16, 
247,168,0,177,251,200,49 
+251,201,255,208,17,165, 
58 


DATA 145,251,136,165,57, 
145,251,32,160,192,32,16 
es 192,208,47,160,8,177,2 


fray 217,57,0,208,32,20 
@,192,2,208,244,32,160, 
192, 268, 28, 32,88, 193,16 
9 

DATA 99,160,193,32,30,1 
71,166,57,165,58,32,205 
,189,162,128,108,0,3,32 
DATA 64,193,76,82,192,7 
6,228,167,160,2,177,251 
+24,105,1,145,251,208,7 
DATA 206,177,251,165,0, 
145,251,96,169,6,141,13 
1,193,32,41,192,168,0,1 
77 

DATA 251,200,49,251,201 
+255,248,65,168,1,177,2 
51,153,129,193,136,16,2 
48,16 

DATA 4,177,251,56,237,1 
29,193,200,177,251,237, 
130,193,176,33,169,1,14 
1,131 

DATA 193,166,7,177,251, 
72,136,16,250,160,4,104 
+145, 251,200,192,8,208, 
248 

DATA 166,0,104,145,251, 
208,192,4,208,248,32,64 
+193, 76,187,192,173,131 
7193 

DATA 208,167,96,32,179, 
192,32,41,192,169,13,32 
+ 210,255, 168,0,177,251, 
176 

DATA 206,49,251,201,255 
240,25,177,251,32,78,1 
93,169,58,32,216,255,20 
0,177 

DATA 251,178,208,177,25 
1,32,78,193,32,64,193,2 
98,214,76,88,193,165,25 
1,24 

DATA 165,4,133,251,165, 
252,105,0,133,252,96,14 
@,131,193,32,205,189,17 
2,131 

DATA 193,96,169,228,141 
18,3,169,167,141,9,3,96 
+13,84,79,79,32,77 
DATA 65,78,89,32,69,88, 
69,67,85,84,73,79,78,83 
+32,79,78,32,76 

DATA 73,78,69,32,0,8,8, 
8 








Program 2: Line Count—128 
Version 


KJ 18 


BH 28 


FORA=3872T03517 :READB: PO 
KEA, B:C=C+B:NEXT 

IFC <>53196THENPRINT" 
(CLR}DATA ERROR": STOP 








cs 


FG 


SP 


ca 


PK 


QR 


QD 


GB 


ax 


SK 


XP 


8x 


SF 


PF 


BD 


38 


46 


58 


68 


78 


98 


188 


118 


128 


138 


148 


158 


168 


178 


186 


198 


208 


218 


220 


238 


248 


258 


2668 


PRINT "{CLR} (WHT) 
{2 DOWN}]SYS 3675: TO INI 
TIALIZE":PRINT “{DOWN]SY 
S 3072: FOR A REPORT" 
DATA 76,63,13,169,48,141 
18,255,32,56,12,162,14,1 
60,8,169, 255,145,251 
DATA 136,208, 251,230,252 
+202, 208,246,169,65,141, 
8,3,169,12,141,9,3,169 
DATA 255,141,187,13,141, 
188,13,169,240,141,19,18 
1169,8,141,8,255,96,169 
DATA 8,133,251,169,248,1 
33,252,96,169,48,141,8,2 
55,32,56,12,165, 60, 201 
DATA 255,248,10,205,188, 
13,268,7,165,59,205,187, 
13, 248,116,168,1,185,59 
DATA 8,153,187,13,136,16 
+247,168,0,177,251,208,4 
9,251,201, 255,208,17,165 
DATA 60,145,251,136,165 
159,145,251,32,218,12,3 
2,218,12,208,77,160,8,1 
77 
DATA 251,217,59,0,208,6 
2,288,192,2,208,244,32, 
210,12, 208,58,32,155,13 
DATA 169,159,168,12,32, 
125,255,13,84,79,79,32, 
77,65,78,89,32,69,88 
DATA 69,67,85,84,73,79, 
78 ,83,32,79,78,32,76,73 
+78,69,32,8,166 
DATA 59,165,60,32,133,1 
3,162,128,188,8,3,32,11 
9,13,76,162,12,76,162 


DATA 74,168,2,177,251,2 
4,105,1,145,251,208,7,2 
06,177,251,105,8,145,25 


1 
DATA 96,169,8,141,189,1 
3,32,56,12,168,0,177,25 
1,268,49,251,281,255,24 
@ 


DATA 65,168,1,177,251,1 
53,187,13,136,16,248,16 
®,4,177,251,56,237,187, 
13 


DATA 200,177,251,237,18 
8,13,176,33,169,1,141,1 
89,13,168,7,177,251,72, 
136 

DATA 16,250,168,4,104,1 
45,251, 208,192,8,208,24 
8,168,0,104,145,251,208 


1192 

DATA 4,208,248,32,119,1 
3,76,237,12,173,189,13, 
288,167,96,169,48,141,68 
DATA 255,32,229,12,32,5 
6,12,169,13,32,171,13,1 
60,0,177,251,178,208,49 
DATA 251,201,255,240,25 
2177,251,32,133,13,169, 
58,32,171,13,208,177,25 
1,178 

DATA 200,177,251,32,133 
413,32,119,13,208,214,7 
6,155,13,165,251,24,105 
4 


DATA 133,251,165,252,18 
5,8,133,252,96,148,189, 
Paniaites Bel el/ 8285 ¢2 


DATA 32,50,142,169,48,1 
41,8,255,172,189,13,96, 
169,162,141,8,3,169,74 
DATA 141,9,3,169,6,141, 
®,255,96,72,169,6,141,8 
+255,104,32,218,255 














FB 278 DATA 169,48,141,0,255,9 


6,8,8,8 


Program 3: Line Count—Plus/4 


and 16 Version 
DQ 10 FORA=4096704479:READB:PO 


FG 
GP 


sD 


HS 


gc 


Gs 


GP 


aD 


EP 


sD 


sc 


QM 


Qk 


20 


308 


48 


58 


68 


76 


90 


KEA, B:C=C+B:NEXT 
IPC<>45377THENPRINT" 
{CLRJDATA ERROR": STOP 
PRINT “(CLR}{2 DOWN }SYS 
{SPACE}4099: TO INITIALI 
ZE":PRINT "{DOWN}SYS 499 
6: FOR A REPORT" 

DATA 76,39,17,32,41,16,1 
62,14,160,8,169,255,145, 
252,136,208, 251,230,253 
DATA 202,208, 246,169,508, 
141,8,3,169,16,141,9,3,1 
69,255,141,125,17,141 
DATA 126,17,96,169,8,133 
1252,169,18,133,253,96,3 
2,41,16,165,58, 201,255 
DATA 240,124,205,126,17, 
208,7,165,57,205,125,17, 
240,112,168,1,185,57,8 
DATA 153,125,17,136,16,2 
47,160,0,177,252,208,49, 
252,201,255,208,17,165,5 
8 


DATA 145,252,136,165,57, 
145,252,32,186,16,32,186 
116,268,73,168,0,177,252 


168 DATA 217,57,0,208,58,20 


118 


128 


138 


148 


158 


168 


176 


188 


198 


208 


218 


228 


236 


248 


@,192,2,208,244,32,186, 
16,208,54,32,114,17,32 
DATA 79,255,13,84,79,79 
,32,77,65,78,89,32,69,8 
8,69,67,85,84,73 

DATA 79,78,83,32,79,78, 
32,76,73,78,69,32,8,166 
.57,165,58,32,104 

DATA 17,162,128,168,8,3 
,32,98,17,76,82,16,76,2 
14,139,168,2,177,252 
DATA 24,105,1,145,252,2 
98,7,206,177,252,105,8, 
145, 252,96,169,0,141,12 
7 








DATA 17,32,41,16,168,8, 
177,252,268,49,252,261, 
255,246,65,160,1,177,25 
2 


DATA 153,125,17,136,16, 

248,160,4,177,252,56,23 

7,125,17,2086,177,252,23 
26 


DATA 17,176,33,169,1,14 
1,127,17,168,7,177,252, 
72,136,16,258,168,4,104 
DATA 145,252,208,192,8, 
208,248,168,0,104,145, 
52, 208,192,4,288,248,32 





98 

DATA 17,76,213,16,173,1 
27,17,208,167,96,32,205 
+16,32,41,16,169,13,32 
DATA 216,255,168,6,177, 
252,178,2008,49,252,281, 
255,248,25,177,252,32,1 
84,17 

DATA 169,58,32,210,255, 
268,177, 25 78,268,177 
Ueeae 32, 104, 17, 32, 98, 17 
22 

es 214,76,114,17,165, 
252,24,105,4,133, 252,16 
5,253, 33,253,96, 








DATA 127,17,32,95,164,1 
72,127,17,96,169,214,14 
1,8,3,169,139,141,9,3 
DATA 96,6,6,8 


ESCaping With 128 
(Article on page 70.) 


Program 1: ESC Sequence Demo 


GF 108 PRINTCHRS(14); 

PA 118 MD=RGR(X):IF MD<>5 THEN 
PRINT" (CLR) (DOWN } (RVS) 
{2 SPACES]PLEASE USE 80 
COLUMNS FOR THIS DEMO. 


{2 SPACES} {OFF}":END 
120 REM *#etenannennesennes 


rerrrererer 2 


REM * PRINT HEADER AND 


{SPACE }MAKE WINDOW * 
REM See AHA wR RRR 


wee setae 


GP 130 


gD 140 





156 


PRINT" {HOME} [RVS} 

{13 SPACES}USING ESCAPE 
CODES IN A BASIC PROGR 
AM - EXAMPLES 

{34 SPACES}":WINDOWS,1, 


79,24,1 


168 
176 


Peretirty 





188 REM * ESC D — DELETE LI 


NE EXAMPLE * 
190 REM *##ktRRRRRRR RRR ERR 


preerersrersy 


PRINT"{3 DOWN}{3 RIGHT) 
are LINE WON'T BE ERAS 


208 





210 PRINT {3 RIGHT)THIS LIN 
E WILL BE ERASED USING 
(SPACEJESC D .....(RVS)} 
HIT ANY KEYTOPF}" 

PRINT"{3 RIGHT}THIS LIN 
E WON'T BE ERASED...BUT 
WILL MOVE UP ONE LINE. 


QE 226 





230 Geteeyag :PRINT* {uP} "CHR 


$(27)"D 
REM *#eteeenneeanetenee 
erereti tite titrate tard 


248 
250 REM * ESC Q - DELETE TO 


END-OF-LINE EXAMPLE * 
REM *#*etteasaneeesenee 


preverecererrcressrrrcs 
PRINT"{2 DOWN}{3 RIGHT) 
THIS LINE WILL BE HALF 
TSPACEJERASED USING ESC 
Q...HIT ANY KEY 

(23 LEFT)"; 
GETKEYAS : PRINTCHR$ ( 27)" 


g 


268 


MG 278 


280 





AQ 360 REM * ESC P - DELETE TO 
START-OF-LINE EXAMPLE 


{SPACE} * 





328 


EP PRINT"(3 RIGHTJTHIS LIN 
E WILL BE HALF ERASED U 
SING ESC P...HIT ANY KE 
¥(24 LEFry"; 

GETKEYAS : PRINTCHRS ( 27)" 


338 


eens 





350 REM * ESC I - INSERT A 


(SPACE }LINE EXAMPLE * 
REM *#ttteenaeeesseeees 
steeeeeeeneeee 


PRINT" (3 DOWN) (RVS}YOU 
{SPACE }COULD DEFINE THE 
FUNCTION KEYS AS WORD- 
PROCESSING TOOLS" 


368 
378 





MF 


XF 


RR 


KF 





SK 


HQ 


xc 


QE 


QE 


XM 


HF 


KEY 1,CHR$(27)+"I" :PRI 
NT"{RVSJWITH: KEY 1, CH 
R$(27)+'T' (OFF 

PRINT" {DOWN} (3 RIGHT TH 
IS LINE WILL STAY HERE. 


388 





400 PRINT"(3 RIGHT)THIS LIN 
E WILL MOVE DOWN ONE US 
ING ESC I...{RVS) HIT F 
1 (OFFI"; 

GETKEYAS :GETKEYB§ :C$=A$ 
+BS :PRINTC$; 

PRINT" ({RVS} 
L INSERT TH 


PRINT"({2 DOWNJ"; 
REM #e RRR RRR 


JOIST 
REM * ESC A ~ AUTOMATIC 


410 
426 











430 


440 





rrrtasy 
PRINT" (DOWN WE'LL INSER 
T TEXT INTO THE MIDDLE 
(SPACEJOF THIS LINE USI 
NG ESC A ...HIT ANY KEY 
aot 

GETKEY A$ 

PRINT"({22 LEFT}";CHRS(2 
7)"A";"(RVS}THIS IS INS 


ERT MODE " 
REM ##tteteeeeeeen een 


pevsrerereretra titi tits 
ae 
REM * REMEMBER TO CANCE 
L INSERT MODE FOR SPEED 
* 


460 


470 
480 





490 


508 





* 


510 REM **eteeeteee 


BERRA ER RR RRR 
+e 

PRINTCHRS (27)"C 
REM ***ka RARER ERR RE 
proevecerettrtrtaticet cd 


REM * ESC @ - ERASE TO 
(SPACE }END-OF-SCREEN EX 


AMPLE * 
REM OS UOO HII ii 
proerecttietttttt attr iit 


PRINT"(2 DOWN JNOW WE'LL 
USE ESC @ TO ERASE HAL 
F OF THE SCREEN...HIT A 
NY KEY"; 

GETKEYAS 

PRINT" (HOME}{14 DOWN)"; 
CHR$(27)"@"; 

REM tke take RRR ARR Ree 
Prverrirititti iii titttty 
* 


REM * ESC T & ESC B- S 
ET UP A WINDOW EXAMPLE 


{SPACE}* 
610 REM **** tee + 


rerrereritettet ete t iit 
* 


PRINTCHR$ (27)"T";" 

(30 RIGHT}{15 DOWN)";CH 
R$(27)"B" 

PRINT" (CLRJTHIS IS A WI 
NDOW":PRINT™USING ESC T 
AND ESC B":SLEEP 3:CAT 
ALOG 

PRINT" {DOWNJYOU CLEAR T 
HE WINDOW":PRINT"BY PRI 
NTING 'HOME'":PRINT“TWI 
ta 





520 
536 








549 


558 


560 


570 
580 


598 





608 





620 


630 


640 





650 PRINT" (DOWN }JHIT ANY KEY 
TO END" :GETKEYA$ 
PRINT"[2 HOME}"; :PRINT" 
{CLR}{3 DOWN}{5 RIGHT} 
(RVSJALL DONE 11" 

END 

PRINT*HIT ANY KEY..":GE 
‘TKEYAS : RETURN 
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660 


678 
680 





7 


Program 2: ESC Sequence 
Function Keys 
90 REM DEFINE KEYS: 


MD 
BX 
MX 
gD 
ED 
gD 


PD 


168 
116 


120 
130 
146 
158 
168 
176 


188 


198 
200 


210 
228 


230 


240 


250 
268 


270 
2808 
298 


REM 
KEY 1, CHRS(27)+"A" : R 
EM INSERT MODE 

KEY 2, CHRS(27)+"C" : R 
EM CANCEL INSERT MODE 
KEY 3, CHR$(27)+"I" : R 
EM INSERT A LINE 

KEY 4, CHR$(27)+"D" :RE 
M DELETE A LINE 

KEY 5, CHRS$(27)+"J" :RE 
M MOVE TO START OF LINE 
KEY 6, CHR$(27)+"K" :RE 
M MOVE TO END OF LINE 
KEY 7, CHR$(27)+"P" :RE 
M ERASE TO START OF LIN 


E 

KEY 8, CHR$(27)+"Q" :RE 
M ERASE TO END OF LINE 
REM 

REM(2 SPACES]SET UP MEN 
U AT BOTTOM OF SCREEN 
REM 

PRINT" (HOME) (23 DOWN)"; 
CHR$(27)"M"; 

PRINT" (RVS}[3 SPACES }F1 
~INSERT(5 SPACES }F3-INS 
ERT LINE{5 SPACES)F5-MO 
VE TO START OF LINE 

{3 SPACES }F7-ERASE TO S 
TART" 

PRINT" (RVS}(3 SPACES }F2 
-NO INSERT(2 SPACES JF4- 
DELETE LINE{5 SPACES)F6 
-MOVE TO END OF LINE 

{5 SPACES}F8-ERASE TO E 
ND{2 SPACES}" 

REM 

REM PROTECT THE MENU WI 
TH A WINDOW 

REM 

WINDOW 6,0,79,22,1 
PRINT" (CLR}";CHR$(27)"L 


Directory Extension 


(Article on page 75.) 
AB 100 POKE 53280,15:POKE 5328 


xs 
KR 


KC 


HE 





118 


116 
120 
130 


140 


158 
168 


1768 


188 
196 


1,15 :PRINT" (CLR) (WHT) 
{6 DOWN} (10 SPACES} DIRE 
CTORY EXTENSION" 
PRINT"(16 SPACES}£19 T9 
{5 Down)" 

FOR 1=838 TO 902:READ D 
:POKE I,D:NEXT 

DNS$=" (HOME } (21 DOWN}":P 
$="EP9 (DOWN) (2 LEFT} EN] 
(rvs) lopr}&H3 {Down} 
{2 LEFT) &yi":Xx=1 
Mrs="{RvS) (WHT) 

{19 spAcEs}{oFF} 

{4 SPACES} (RVS) 

{36 SPACES}{BLK}" 
DM=144:DIM F$(DM),S$(DM 
),T$(DM),S2$(DM) 

FOR I=0 TO DM:F$(I)=CHR 
$(32)+"(18 SPACES)" :NEX 
T 


PRINT" (UP} {11 SPACES}RE 
ADING DIRECTORY 

(2 SPACES}":OPEN1,8,9," 
$":SYS 830:CLOSE 1 
GOSUB 958 

POKE 198,0:PRINT"(CLR} 
{Down } {WHT} "SPC(9) PS" 
(up) (LEFT) {RVS)}1{OFF}"s 
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CE 


DH 


HK 


PB 


JB 


GQ 


BR 


SH 
BF 


KB 


208 


210 


226 


238 


248 


258 


260 


270 
288 
298 


308 
318 


328 
3308 


348 
358 


368 
378 
388 
398 


408 


418 


420 


436 
440 
450 
460 
478 


486 


498 


500 
510 


526 


538 


PC(3)"VIEW DIRECTORY FI 
LE" 


PRINT"(2 DOWN} "SPC(9)PS 
“{UP} {LEFT} {RVs} 2{OFF)" 
SPC(3)"SEND DISK COMMAN 
Ds" 

PRINT"{2 DOWN) "SPC(9)P$ 
“(up} (LEFT) (RVS}3(OFF}" 
SPC(3)"SAVE" 

PRINT"({2 DOWN] "SPC(9)P$ 
“(up) (LEFT } (RVS}4{OFF}" 
SPC(3)"VIEW DIFFERENT D 
Isk" 

PRINT" {2 DOWN) "SPC(9) PS 
(uP) (LEFT) (RVS)5(OFF}" 
spc(3) "Quit" 

PRINT"(2 DOWN) "SPC(28)P 
$"(uP} {LEFT} (RVS} [oFF)} 
“:PRINT" {UP} "SPC(9) "ENT 
ER YOUR CHOICE &N3EB3 
(LEFT }"; 

POKE 204,0:GET CG$:IF C 
GS$<"1" OR CG$>"5" THEN 
{SPACE} 256 

POKE 204,1:POKE 207,0:P 
RINT" (RVS}"CG$ :CG=VAL(C 


G! 
88 coro 298,1096,520 
1240,1340 
REM *** VIEW FILES *** 
C=PEEK(@)-1:A=1 
IF A=> C THEN 330 
IF A<® AND eheaiun(c/6) 
THEN A=C-5:Gi 
IF A<O THEN Baerwtte/6) 
2 A=DN*6+1 
PRINT" {CLR} (DOWN } {BLK} 
{orr}{3 SPACES)DISK TIT 
LE: (RVS}"F$(0)" “:PRIN 
T" (DOWN) ":PQ=5 
FOR I=A TO A+PQ 
IF_F$(I)=CHRS (32) +" 
{18 SPACES)" OR F$(I)=" 
“ THEN F$(I)="":PQ=PQ-1 
NEXT 
FOR I= A TO A+PQ 
IF I>9 THEN WS=" 
{RVS}":GoTo 400 
WS="(2 SPACES) (LEFT) 
(Rvs}" 
PRINT" (LEFT) "1;W$;LEFTS 
(F$(I),16)":"MT$ PRINT" 
{2 uP} "spc(20); 
PRINT" (RVS} (WHT) "S$(I)" 
{2 DOWN) (BLK) ":NEXT 
PRINT DN$"(3 DOWN) F1-M 
ENU F3-ADD F5-FWD F7-BA 
CK 1-DELETE[HOME}":POKE 
198,0:WAIT198,1 


{LEFT} 


IF PEEK(197)=54 THEN 12 
86 
IF PEEK(197)=4 THEN 190 


PEEK(197)=5 THEN 610 
PEEK(197)=6 AND A=C 
(SPACEJTHEN A=1:GoTO 36 


8 

IF PEEK(197)=6 AND A+6> 
C THEN A=1:GOTO 300 

IF PEEK(197)=6 AND A<C 
{SPACE} THEN A=A+6:GOTO 
(SPACE} 360 

IF PEEK(197)=3 THEN A=A 
-6:GOTO 300 

GoTo 430 

REM *** SAVE DESCRIPTIO 
NS *** 

PRINT" (2 UP}"SPC(28)" 
{LEFT}{2 DOWN} ":PRINT" 
{2 up}"spc(9)" 

{2 SPACES]SAVING "CHR$( 
34)"DIR FILE"; 


PRINT CHRS$(34)"...":FOR 





sD 


5 


KA 


XM 


GA 


PF 


QF 


630 


648 


658 
660 
670 
680 


698 
788 
716 


726 


738 


R=l TO C: F S$(R)="" T 
HEN S$(R)="(RVS} " 
NEXT R 

CLOSE1:CLOSE 15:0PEN 1, 
8,15,"S@:DIR FILE":CLOS 
E 1:0PEN 15,8,15, "I" 
OPEN 1,8,8,"0:DIR FILE, 
S,W":GOSUB 1650 
PRINT#1,C 

FOR I=] TO CrPRINT#1,LE 
FT$(F$(I),16) :PRINT#1,S 
$(1) :NEXT:CLOSE 1 
PRINT" {UP}(31 SPACES}": 
GOTO 198 

REM *** ADD STATEMENTS 
{SPACE} *** 

PRINTDN$"{3 DOWN) "SPC(9 
)" (RVS }F3-ADD{ HOME } " 
PRINT DNS" (DOWN } 

{3 SPACESJENTER FILE #" 
33POKE 198,0:INPUT PIS: 
FI=VAL(FI$) 

IF FIS="9" THEN PRINTDN 
$" (DOWN) (18 SPACES]":GO 
TO 428 

IF PICA OR PI>A+PQ THEN 
PRINT DN$ SPC(17)" 
{powy) (18 SPACES}":GoTo 
610 

PRINT DNS" {DOWN} 

(26 SPACES}":IF FI<7 TH 
EN Z=FI:GOTO 680 
Z=INT(FI/6)+1:DD=Z*6-FI 
+Z=6-DD 

IF Z=0 THEN Z=6 

PRINT" (HOME } { DOWN)": FOR 
I=1 TO Z:PRINT" (DOWN) "x 
NEXT 
F$(F1I)=LEFT$(F$(FI),16) 
Ise"* 

PRINT" {UP} "SPC(19)" 
{RVS)}> {WHT} "SPC(LEN(I$) 
);2B$="<":CC=LEN(BS$) :L= 
1 


PRINT" (RVS}"MID$(BS$,L,2 
)¢"(LEFT)"; sL=-L*(L<cc) 
+1 

GET AS:IF A$="" OR AS=C 


~ HR$(34) OR A$=CHRS (44) 


740 
758 


760 


778 
788 
798 


808 
818 


828 
838 


AK 848 


PA 


HE 


850 
860 


878 


88a 


898 


{SPACEJOR A$=CHR$(58) T 
HEN 730 

IF A$=CHR$(59) THEN 730 
IF A$=CHR$(13) AND LEN( 
1§)=18 THEN 910 

IF LEN(I$)=18 AND A$<>C 
HR$(20) THEN I$=I$+A$:P 
RINT AS“{OFF}[4 SPACES) 
(Rvs )<{LEFT}"; :GOTO 720 
IF LEN(I$)=55 THEN PP=1 
IF LEN(I$)=55 AND A$<>C 
HR$(20) AND A$<>CHR$(13 
) THEN 730 

IF A$=CHR$(13) AND LEN( 
I$)=0 THEN 330 

IF AS=CHR$(13) THEN 910 
IF A$=CHR$(20) AND LEN( 
I$)=19 THEN 880 

IF A$=CHR$(20) AND LEN( 
I$)>@ THEN 850 

IF ASC(A$)<32 OR ASC(A$ 
)>95 THEN 720 
I$=I$+A$:PRINT A$; :GOTO 
720 
IS=LEFT$ (I$ ,LEN(I$)-1) 
IF LEN(I$)=54 THEN PRIN 
T"(OPF) (RVS}(2 LEFT)"; 
:GOTO 728 

ee vs) (2 LEFT}";: 
GoTo 

TOME ESN 
PRINT"{RVS} ":D=19 

IF PP=1 THEN PRINT" 











SM 


EM 
BO 


RS 


OF 


gD 


9708 
980 
998 
1988 
1618 


1620 


16368 


1648 
1658 


1066 
1078 


1688 


1098 


1108 


1110 


11208 


1130 


1140 
1156 


1166 
1178 
1188 
1198 
1200 
1216 


1226 
1238 


1240 


{3 uP) "spc(38)"";:GoTO 
RSERCE Ly 20 
PRINT"({2 UP} "SPC(38)""; 
:GOTO 728 
S$(FI)=I$ 
IF LEN(S$(FI))<19 THEN 
(sPACE} 330 
S8$(FI)=MID$(S$(FI),1,19 
)+"(OFF)(4 SPACES} (RVS)} 
"4+MID$ (S$ (FI), 20,37) 
S$(FI)=S$(FI)+"(UP}":GO 
TO 330 
OPEN 15,8,15, "I" 
OPEN 1,8,8,"0:DIR FILE, 
S,R":GOSUB 1650:1F EN=6 
2 THEN CLOSE 15:RETURN 
PRINT" {UP} "SPC(19) "DIR 
(SPACE )FILE(6 SPACES)" 
INPUT#1,C 
FOR I=1TO CrINPUT#1,T$( 
I) sINPUT#1,S§(I) :S2$(I) 
=S$(I) :NEXT 
CLOSE 1:CLOSE 15:NF=PE 
EK(®)-1 
FOR A=1T0 NF1IF LEFTS$( 
FS(A),16)=TS(A) THEN S 
$(A)=S2$(A) GOTO 1648 
FOR B=1 TO CrIF LEFT$( 
F§(A),16)=T$(B) THEN S 
$(A)=S2$(B) :B=C+2 
NEXT B:IF B=C+l THEN S 
S(A)="" 
NEXT A: RETURN 
INPUT#15 ,EN,EM$:IF EN= 
© THEN RETURN 
IF EN=62 AND XX=1 THEN 
XX=0 RETURN, 
PRINT" (CLR}{4 DOWN }DIS 
K ERROR: (RVS}";EN; EMS: 
PRINT" {HOME} {4 DOWN}"S 
pc(14)" {Rvs} 
REM *** SEND DISK COMM 
ANDS *** 
PRINT"({CLR}{2 DOWN} DI 
SK COMMANDS": PRINT" 
{2 DOWN) COMMANDS ":PRI 
nr" &8 73" 
PRINT" (DOWN) S@:FILENA 
ME"SPC(11)"SCRATCH A F 
ILE 
PRINT" {DOWN} R@:NEWNAM 
E=OLDNAME(4 SPACES )REN 
AME A FILE 
PRINT" (DOWN) vo"SPC(20 
)"VALIDATE A DISK": PRI 
Nr" (DOWN) I6"SPC(26)"I 
NITIALIZE" 
PRINT"(2 DOWN} ENTER C 
OMMAND(3 SPACES} (RETUR 
N FOR MENU)":Z$="":PRI 
NT" >"; 
GET U$:IF U$s"" THEN 1 
216 





IF LEN(Z$)=37 AND U$<> 
CHR$(13) AND U$<>CHRS§( 
20) THEN 1140 
UsASC(U$):IF U=13 THEN 
1226 

IF U¢>26 THEN 1200 

IF LEN(Z$)<>@ THEN 2$= 
MIDS (Z$,1,LEN(Z$)-1) :P 
RINT US; 

Goro 1149 

IF U<32 OR U>90 THEN 1 
140 
PRINT" < (LEFT )";U$;22$= 
ZS$+U$ :GOTO 1140 

IF Z2$="" THEN 196 
CLOSE1:OPEN 1,8.15,Z$: 
CLOSE 1:CLOSE 15:0PEN 
{SPACE}15,8,15, "I":GOS 
UB 105 :GOT0190 
PRINT" {CLR} (8 DOWN} 








(7 SPACES}INSERT NEW D 
ISK INTO DRIVE" 
PRINT"{2 DOWN} 

{7 SPACES}PRESS ANY KE 
Y TO CONTINUE":POKE 19 
8,O:WAIT 198,1:GET ES 
PRINT" (UP) (13 SPACES)P 
LEASE WAIT{8 SPACES}": 
CLR:GOTO 136 

REM *** DELETE DESCRIP 
TIONS *** 

PRINTDN$"(3 DOWN} "SPC( 
31)" (RVS}1-DELETE 
(HOME }" 

PRINT DN$" (DOWN }"SPC(1 
®)"(29 SPACES)" 

POKE 198,0:FI$="":PRIN 
T DN$"(DOWN)(2 SPACES} 
DELETE #";:INPUT PI$:F 
I=VAL(FI$) 

IF FIS="6" THEN PRINT 
{SPACE } DNS" (DOWN } 

(14 SPACES}":GoTO 426 
IF FI¢A OR FI>A+PQ THE 
N 12868 

S$(FI)="(RVS) ":GoTO 3 
30 


1258 


1268 


1278 
1280 


1290 





1308 


1318 


1320 
1330 


1340 
13508 


POKE 198,0:SYS 198:END 
DATA 169,255,133,8,165 
+55,133,71,165,56,133 
DATA 72,162,1,32,198,2 
55,166,0,232,134,8 
DATA 216,56,165,71,233 
+20,133,71,176,5,166 
DATA 72,202,134,72,32, 
207,255,164,144,208 
DATA 22,201,34,208,245 
1166 ,0,32,207,255,201 
DATA 34,246,249,145,71 
200,192 ,19,208,242 
DATA 240,207,32,204,25 
5,96,8,0,0 


Pig$ For Buck$ 


(Article on page 42.) 


Program 1: Pig$ For Buck$— 


Main Program 
SG 16 FAST: TRAP970:GRAPHIC1:GR 
APHICO :GOTOS8G 
GOSUB306 :FORI=2TOP :MOVSP 
RI, 200,125 :NEXT:TI$="000 
900" 
SPRSAVS$(5,F1),F:SYSM1,0 
:MOVSPRE, 24,88 
FORI=2T0P: IFI=P1THENS@ :E 
LSEJ=RND(F)*359+F:C=INT( 
J/188):SPRSAVS$(C,F1),I: 
SYSM1,1I-F:SPRSAVS$(C,F3) 
+ T:SPRITEI,F,11,8:MOVSPR 
I,J #8 
NEXT: SPRITEF,F,15,, 
OKE7686, PrTeBUMP(PL) 2 
UMP(F) 
PORI=2T0P : IF (BUMP (F1)AND 
F)OR( (BUMP (F)ANDF)ANDP1> 
« )THEN310: ELSEIFI=P1 THEN 
90 
IFRSPPOS(I,F)<Y1THENC=F3 
:GOTO106 :ELSEIFRSPPOS(I, 
F)>Y2THENC=F4 :GOTO160 :EL, 
SEIFRSPPOS(I,.)>X2THENC= 
F1:GOTO100 :ELSEI FRSPPOS ( 
I, .)<XLTHENC=F :GOTO168 
Goro136 
IFRSPPOS(P1,.)<25ORRSPPO 
S(P1,.)>344THEN376:ELSEL 
30 
100 J=RND(F)*160+SM(C):IFU> 
360THENT=J-366 
QA 110 C=INT(J/18G) :SPRSAVS$(C 
1F1),I:SYSM1,I-F:SPRSAV 


1368 
1376 
1380 





1390 
1406 


MB 1410 


MP 20 


FE 30 


ED 40 


AM 


50 


PK 66 


BP 76 


RB 
EX 


80 
90 


BK 








MF 


JQ 
RQ 


GQ 


XE 


DR 


DF 


cs 


EP 


HD 


E582 


cs 


ac 


DH 


HA 


MG 


EG 


Pp 


AM 


BK 


126 


136 
148 


158 


160 
170 
180 


198 


201 


210 


221 
231 


248 


258 
268 
270 
286 


291 


300 


310 


32 


33 


34 


350 


360 


370 


S$(C,F3),I:MOVSPRI,J #R 
ND(E)*F1+F 
IFRND(F)>F2THENSOUNDF1, 
2000,5,.,100,100,F3:SOU 
NDF, 13008,12,.,758,19,F1 
7378 :GOTO138 
J=JOY(P1) 
S1=J:1FJ> ANDI <9THEN18O 
tELSEMOVSPRF,. #.:POKEM 
2,+:IPP1>.THENMOVSPRP1, 
ote 
IFRND(F)>F2THENSOUNDF1, 
2008,5,+,100,100,F3:SOU 
NDF, 2000,10, .,600,158,F 
1,220: IFL> LOTHENFS=RND( 
F)*P3+F 
IFJ>8THEN210 
NEXT :GOTO6O 
IFRSPPOS(F, « )<24ORRSPPO 
S(F, +)? 344THENI=0(J) IF 
RSPPOS(F, . )<400ANDRSPPO 
S(F,.)>25THENJ=3 
IFJ= . THEN6@ : ELSEMOVSPRF 
+A(J) #FS:POKEM2,F:IFP1 
>. THENMOVSPRP1,A(J) #FS 
@ SPRSAVS$(J,.),FsSYSM1,. 
:SPRSAVS$(J,P),F:NEXT:G 
oro6a 
IFP1> .THEN270 : ELSEJ=BUM 
P(F) IF (JANDP) <>PTHENNE 
XT:GOTO68 
®@ GOSUB280 :1=F1 :C=RSPPOS( 
F,.):J=RSPPOS(F,F) 
® DOUNTILI>P:IF(ABS(C-RSP 
POS(I,.))<26)AND(ABS (J- 
RSPPOS(I,F))<20)THENBEG 
IN 
Pl=I:SOUND1 ,7600,40,.,4 
98,400, 2,220:SPRSAVSS (F 
P1),Pl:SYSML, P1-F: SPRS 
AVSS$(F,F3),P1:MOVSPRI ,C 
+26,J3-5:EXIT: BEND 
IsI+F:LOOP 
I=BUMP(F) :GOTO46 
P1=.:GOTO46 
POKE7680, .: POKE7681 
ORI=1T08 :MOVSPRI, . 
EXT: RETURN 
® PRINT" (HOME}£23":FORI=1 
T04:READC, J ,M$:CHAR, C,J 
+ M$ :NEXT: 1FL=12THENCHAR 
+31, 6 :SYS7937 :RETURN 
J=P*23X1 550+ :X2=290-T: 
Y¥1=65+J :¥2=190-9: RETURN 
GOSUB280 :P1=0:POKE2640, 
56:SPRSAVS$(5,2),F:VOL1 
5:SOUNDF1 , 9080 ,5,F, 2000 
+900, F:PORI=1T080 :NEXT: 
FORI=6TO08 : IFI=6THENSOUN 
DF, 9000,35,F, 2000, 200,0 
SPRSAVS$(I,2),F:FORC=1T 
050 :NEXTC, I: SOUNDF , 300, 
15, F, 200, 6:VOL3 :SLEEPF 
IFOL@OTHEN790 :ELSECHAR, 
2*OL-F, 23, "R69 ":CHAR,2 
69 ":OL=OL-F 





Hern 





8 





8 FORI=1 7001; CHAR, 2*I-1,2 
BLUJ£":CHAR,2*I-1, 
24, "(BLU ) ¢" NEXT: RETURN 
PRINT" {HOME} {RVS) {BLK} 
{4 SPACES}PIG$ FOR BUCK 
${8 SPACES} LEVEL: "; :PRI 
NTUSING" ###" ;L;:PRINT" 
{3 SPACES) (OFF) "; 

CHAR, 10,24 :PRINT" £23"; 
PRINTUSING"#S######.##" 
7BA; :PRINTTAB(24) 
TUSING" ######";PT; 
TTAB(33); :PRINTUSING" ## 
####¢";HS; :RETURN 
GOSUB280 :PS=100-TI/100: 
IFPS<60'THENPS=60 


COMPUTE!'s Gazette October 1986 














119 


RITEP,. 


D FOR " 
RA 400 


XA 410 IFPT>HSTHENHS=PT 


SUB350 


KS 450 GOSUB2908 


=7 


“p" (LEFT) PIGS. 


EP3 
XM 480 I=INT(BA/25) 


SR 498 


(OFF}"; 





HENS 
FS 518 C=VAL(A$) 


GE 520 


P1:GOTO498 
FE 5308 


“; SLEEP] :GOTO498 
FX 548 


+ SLEEP1 :GOT0496 
MR 550 


C) :NEXT: RETURN 


OLOR11,10:VOL3 


F2=.5:P3=3:F4=4 


NEXT 
PX 610 
=7 :NEXT 





PR3":C=2:GOSUB570 


XK 630 S$(8,F1)=S$(F,F1):S$(0, 
F3)=S$(F1,F1):S$(F,F1)= 
8$(F3,F1):S$(F,P3)=S9(4 


Fl) 


HA 640 BLOAD"PIG .ML":SYS7686 :P 
OKE54291 ,2:POKE54287 , 20 


120 COMPUTE!’s Gazette October 1986 


HE 388 PT=PT+INT(PS) :BA=BA+PS: 
IFP1<>PTHENMOVSPRP1 , RSP 
Pos(P,.), RSPPOS(P,F):SP 


GK 398 SPRITEP,@:CHAR, 26,0,CHR 
$(7)+"(RVS}(PURJPIG SOL 


IFPS> 6@THENPT=PT+(10*L) 


DP 420 PRINTUSING"S##.##" 
PRINT" (OFF)"; :SLEEP1:GC 


KX 430 P=P-F:P1=0:1FP>1THENPOK 
E2046 ,56:SPRSAVS$(2,0), 
F:MOVSPRF , 24, 88 :GOTO40 

GE 440 LeL+F:1FL<5THEN450:ELSE 
IF (LANDF)AND(L<12)THENF 
S=F1 : ELSEFS=F3 :GOT0460 


HQ 466 P=INT(BA/60):IFP>7THENP 


AM 470 PRINT" {HOME} "CHR$(27)"Q 
""({RVS}(REDJ}YOU HAVE"; : 
PRINTUSING"#S #0448 .##"; 
BA; :PRINT"; YOU MUST BUY 

": BASBA= 

P*60 1 P=P+F :GOSUB360 : SLE 


IFI=QOROL=4THENS 60 : ELSE 
PRINT" {HOME } "CHR$(27)"Q 
“"{RVS}(RED}PAIRS OF PA 
NTS IN STORE=(LEFT} "os" 
{LEFT}; gry. TO BUY? 


PX 506 GETAS$:IFA$<"S"ORAS>"4"T 





IFC> ITHENPRINT" (HOME}"C 
HR$(27)"Q{RVS}YOU CAN'T 
AFFORD"C"{LEFT} PAIRS 
(SPACEJOF PANTS1"; :SLEE 


IFOL+C> 4THENP RINT" 

{HOME } "CHRS (27) "Q(RVS)T 
HE LINE CAN'T HOLD"OL+C 
“({LEFT} PAIRS OF PANTS! 


IFOS-C<@THENPRINT" 
(HOME } "CHRS (27) "Q{RVS}S 
TORE DOESN'T HAVE"C" 
(LEFT) PAIRS OF PANTS!" 


BA=BA~25*C:0L=OL+C108"0 

S-C:GOSUB349 :GOTOS60 

GH 560 GOSUB359 :GOSUB300 :GoTO2 
8 


AR 576 FORI=1T08:SPRSAVI ,S$(I, 
XA 588 COLORG,14:COLOR4,6:SPRC 


MQ 598 DIMF,J,J1,I,P1,C,F1,F2, 
F3,F4,S$(8,3),M2,M1,FS, 
A(8),Y1,¥2,X1,X2,5M(4), 
0(8) :SM(1)=15 :5M(2)=195 
+8M(3)=1051SM(4)=285:F= 
1:F1=2:M1=7876 :M2=7681 : 





RM 688 FORI=2T08:A(I)=(I-F)*45 
FORI=2T04 :0(I)=310(1+4) 
MD 620 BLOAD"PIG.SPR1":C=@:GOS 


UB57@:BLOAD"PIG .SPR2":C 
=F :GOSUBS5 70: BLOAD"PIG.S 


FK 


EA 


BP 


KF 


GR 


JQ 


XF 


650 
660 


670 
680 
698 


708 


718 
728 
738 
748 


758 
768 


7768 


788 


790 


820 


810 
820 
836 


840 


850 


860 


878 


880 


890 


3POKE54292 ,6:POKE54286, 
a 


IFPEEK ( 2604 )=28THEN7@0: 
ELSEBANK14 

FORI=0TO3 : READC: POKE256 
+1,C:NEXT:POKE1 95,8 :POK 
£196, .:SYS7904 

BANK15 :POKE2604 , 28 
READC: IFC==1 THEN700 
PORI=0TO7 : READJ :POKE1 22 
88+C*B+I,J :NEXT:GOTO68O 
S=2:P=3:0L=41:0S=4:FS=2: 
L=11:PT=0:BA=@:PRINT" 
(CLR] (DOWN ] B23 Q** #4 wee 


FQHAAAH RRR OHNE ERT RE QE 


LLLELLLI*} ? 

FORT=1T03 :FORJ=1706 :1FI 
=3ANDJ=6THEN7 20 t ELSEPRI 
NT"B"TAB(39)"B"; 

NEXT: IF1<> 3THENPRINT"Q" 
TAB(39)"Q"; 

NEXT 

PRINT "Q**## RR RRR QR ERE RE 
KOR AR ARERR HER TR RRR 
SERA AE ELE LEELA 


7 
FORX=1T08 : SPRITEX , 0 :NEX 
T 


PRINT" (RED}§10 @3 (RVS) 
&53(3 SPACES )BANK 

(6 SPACES} PRESENT 

{3 SPACES }HIGH 
(2 SPACES} {OFF} 
PRINT" {RED} &K9(OFF} "TAB 
(9)"{RVSJRKI(OFF) [RVS} 
&53{3 SPACES JACCT. 

{5S SPACES }SCORE 

{5 SPACES]SCORE [OFF}"; 
PRINT" (RED} K3"TAB(9) 
(RVS) £K3(OFF} (HOME) 

{3 Down JQ (DOWN } {LEFT} 
{DOWN} {LEFT} {DOWN} 
{LEFT} (DOWN) (LEFT) "7: 
GOSUB35@ : RESTORE880 :GOS 
UB299 :GOSUB290 : SLOW: GOS 
UB340 :GOTO20 

CHAR, 5,9, "{RVS} (PUR} 

{2 SPACES}END OF GAME! 
{2 SPACES}PLAY AGAIN? 
{2 SPACES} [OFF}" 
POKE28 , 0 :GETKEYAS : [FAS 
<>"Y"THENPRINT" {CLR} 
{GRN}"; :FORC=1T08 :SPRIT 
EC, :NEXT: END 
IFBA>HSTHENHS=BA, 

FAST :GOTO780 

DATAG , 208 ,0,48,28,102,1 
02, 102,126,126,126,126, 
126 ,66,255,255,231,231, 
231,231,231,0 

DATAGS ,G,131,199,255,25 
5,255,255,255,73,128,22 
4,248, 252,252,254,254,2 
55 

DATA74, 255,127,127,63,6 
3,31,7,1, 75,255,254, 254 
1252,252,248,224,128 
DATAB3 , 254, 252,248,248, 
248, 252,254,254,85,1,7, 
31,63,63,127,127,255 
DATASB, 255, 255,255,255, 
255,227,193,0,90,127,12 
7,63,31,31,31,63,127,-1 
DATAG,6, "UI (DOWN } 

{2 LEPT |Z8{DOWN) 
(2 LEFT )IK", 21,6 
(Dow) (2 LEFT )JK 33,5, 
“UAI{DOWN) (3 LEFT )J 
{RVS} lOFF)K",1,19, "I 
{Down} {LEFTJ(RVS) [OFF } 
1" 




















DATA7,14, “UI (DOWN) 
{2 LEFT )JK™,17,12, "UI 








CF 990 


KG 910 


PF 920 


PH 930 


BE 949 


SR 950 


RM 968 


{pow} (3 LEFT Ju{Rvs} 

{2 SPACES} [OFF] {DOWN} 
(3 LEFT JIXK", 26,14, "UI 
(bown) (2 LEFT )z{Rvs} 
lorr} (Down) (2 LEFT )JK", 
34,11, "UI(DOWN) (2 LEFT} 
aK" 


DATAD,7,"(RVS) (OFF)I 
(pows ) (2 LEFT )xK", 20,5, 
“ur (Doww) (2. LEFT )J (RVs) 
Torr)", 32,5, "U{RVS} 
(orF } (ow) (2 LEFT }Jx", 
35,11,"AI(DOWN}(2 LEFT} 
trvs} (OFF )K" 
DATA22,7,"(RVS)} 
(2 SPACES) (OFF }1 {DOWN} 
(3 LEFT )gXK",8,13, "UL 
(pown) {2° LEFT) (Rvs) 
{orF}K",19,13, "AI (DOWN) 
{3 LEFT} (Rvs}(2 Spaces} 
{Orr }K",34,12,"Z{RVS} 
{2 SPACES) { DOWN]. 
{3 LEFT}(3 SPACES} {OFF} 
{DOWN} (3 LEFT )JXk" 
DATAL,2,"{RVS) [OFF JK 
(own } (2 LEFT JK",18,4," 
UI{DOWN} (2 LEFT )Z(RVS} 
T2 spaces} (OFF) (DOWN) 
{3 LEFT )ox{RvS) (oFF}", 
38,5, "U{RVS}(2 SPACES) 
(bown}T3 LEFT} 
{3 SPACES} (DOWN) 
(3 LEFT) (OFF JJK",27,14, 
“AI (DOWN ) (LEFT Js (Down } 
(2-LEFT)(RVS) (OFF )K" 
DATA35,5, "AI {DOWN} 
(2 LEFT )XK",9,14,"(RVS} 
{pown} (2 LEFT} 
{2 SPACES) {OPF} 1 {DOWN} 
{3 LEFT} (RVS}(2 SPACES} 
{OFF }s {DOWN} {3 LEFT }JxK 
",25,13,"U(RVS} lOFFJI_ 
{DOWN} (3 LEFT} J{RVS} 
(2 spaces} (OFFJ",36,14, 
“{Rvs} (Orr) 1 (DOWN) 
(2 LEFT} (RvST(2 SPACES} 
Corr) {Dow} (2 LEFT )JK" 
DATALO,7,"(RVS} lOFFJI 
(pow) (3 LEFT} (Rvs) 
{2 SPACES} (OFF)K",36,5, 
"{RVvS} lOFF)I(DOWN} 
{2 LEFT) (RVSJ(2 SPACES} 
(OFF }1{DOWN) (3 LEFT) 
{rvs} lOPFJK",16,14, 
{Rvs} (2 SPACES) (OFF) 
(pown } (2 BEER OxKK sp 28, 
15,"(RVS} lOFFJI DOWN } 
{2 LEFT )xk" 
DATAL1,8, 
(pow) (3 LEFT} (Rvs J 
{3 SPACES} {DOWN} 
(3 LEFT) [OFF JXK",6,12, 
“UI(DOWN}(2 LEFT} (RVS} 
(3 spaces} {OFF} {DOWN} 
(3 LEFT )a(Rvs) lorF}",3 
4,14,"(RVS)(2 SPACES} 
{Down} (2 LEFT) 
{2 SPACES} {OFF} {DOWN} 
{3 LEFT }u{RVS} 
{2 SPACES) {OFF }X{DOWN} 
(4 LEFT )gK" 
DATA24,2,"J(RVS) LOPF)K 
9, } lOFF)I 
(Down) (eer) (rvs) (OFF) 
1",16,15,"(RVS} 
T2 SPACES) {OFF} {DOWN} 
(3 LEFT)u{RVS} [oFF}s 
{pow} (3 LEFT }g{Rvs}_ 
LOFF }S {DOWN} (2 LEFT }3xx 
I({DOWN) (LEFT }JI(DOWNT 
TLEFT JJ", 33,17, “Z(RVS} 
(2 spaces} {Down} — 




















(3 LEFT}({3 SPACES} OFO0:00 FF 66 03 FF CO OO D7 29 | OF80:63 FF 00 OF FF CO 63 SF 79 
{powN}{3 LEFT) {OFF}JxkK" | 9F08:08 96 7D 08 OF 55 FO 3F C4 | OF88:80 B1 57 BH B1 55 BH BO 2F 








KK 97 PRINT“{HOME} "CHR$(27)"Q | 9F1@:BE FC FF BE FF F3 BE C5 CB | OF90:F8 86 60 F8 OB 03 FB GO BE 
“" (wat) {RVSJLINE "EL" @F18:F2 AA 85 F2 AA 86 52 AA EO | GF98:03 EB CO OF EB CO 17 AY 76 
{2 SPACES) "ERRS(ER)"§2} | 9F20:89 52 AA 86 2 AA 8D 62 2E | GFAG:40 14 AD 46 BB AB BO G2 Cl 
PRESS STOP KEY"; O@F28:AA 80 62 82 86 62 82 80 BS | GFAS:AB8 GB G2 AB BB G2 AA BB 43 
EG 986 GoTo98a GF30:6F C2 80 8 2 8B BB 62 AA | GFBO:02 BA BB G2 8A BB O3 CA B7 


OF38:88 88 B83 FO BB G3 FC BO OC | OFBB:00 OF CF BG OG 3F BB BB 91 
OF40:63 FF O66 OF FF CO 83 SF 39 | OFCO:03 FF 60 GF FF CO 03 5F B9 


Program 2: Pig$ For Buck$— OF48:08 61 57 88 O1 55 BH BG EE | OFC8:08 01 57 BB 01 55 BO BB OF 
PIG.ML OF50:F8 80 OO F@ OO 5F FB OO EF | OFDO:F8 OO OO FB OO O3 FB BO FE 

A Sacer i OF58:5F EB CO OO AB FG 6B AB O3 | OFDB:03 EB CO BF EB CO 17 AD BE 
See instructions in article before GF60:56 GO AB 50 BO AB GB G2 65 | BFEG:40 14 AD 40 Go AB BO G2 2 
typing in the following program OF68:A8 GO 62 AB BB BA AA 8H A3 | GFES:AB BO G2 AS BB B2 AA BOB 83 
listings. GF70:0A 62 AG 3A GB AG 3F GO CC | GFFO:62 8A BB G2 BA GB G3 CA F7 


ese sao iouleniens2F\ejelazi19)|| pres es ertestaEenicniesieniit lin ne wae ee OD 
1EDE:8D 04 1E BD O5 1E 78 AY ED | gres:08 G1 57 BG B1 55 OO BO 2F 
1E16:21 8D 14 @3 A9 1£ 8D 15 EE | gpog;re o0 oo FB 90 SF FB ao 30 | Program 5: Pig$ For Buck$— 
1E1E:03 58 60 AD 86 1E C9 Bl ES | grogsSF EB CO 69 AB FO OO AB 43 | PIG.SPR3 

1E26:D0 35 EE 04 1E AD 64 1E 04 | gPAg:56 88 AB 50 BB AB BB G2 AS 
1E2E:C9 18 DB 2B AY 68 8D 64 BC | graB:AB GB G2 AB BO BA AA Ad £3 | FEGF:00 OB OO GB OB OO BO BB IC 
1E36:1E AD F9 87 C9 39 DO 11 82 | grBg:GA G2 AG 3A BB AD 3F BG GD | GESB:00 BO BB BO OB BB BB BB 24 
1E3E:A2 87 18 BD F8 G7 69 48 6B | gFB8:28 OB BO 3C BO BB FO Go 99 | 9E19:60 BO BB BB BO OO O1 BO 2E 
1E46:9D F8 67 CA DO F4 4c 5D 6D | grco:03 FF 60 OF FF CO G3 5F B9 | BE18:60 82 BG BO G3 CO BO G3 D2 
1E4E:1E A2 07 38 BD F8 07 EO 70 @FC8:88 G1 57 O86 61 55 BB BO GF | 9E20:48 O8 O3 FU B4 B7 FO OS FO 
1E56:48 9D FB G7 CA DO F4 AD DE | OFDO:F8 BO BO FB OO SF FB OO 70 | SE28:FF CO O3 FF 08 O3 FF OB EO 
1E5E:01 1E C9 1 FO @8 AD 68 E6 | OFDAISF EB CO GO AB FO OG AB B3 | GEIO:03 FF OO O3 FE OO OL FE F6 
1E66:8D 12 D4 4C 9B LE EE @5 85 | OFEG:58 OB AB 50 BO AS OD O2 ES | 9EI8:00 G1 FA OB B1 G2 BO BB B4 
1EGE:1E AD @5 LE C9 67 DO 25 DB | GPEB:AB OO G2 AB BB GA AA 8G 24 | VE40:08 08 BB OB B0 GO OG BB SC 
1E76:A9 08 8D O5 1E AD F8 G7 2A | OFFO:GA G2 AG 3A BB AG 3F GA 4D | SE48:00 BO BO OB BB OB BO BB 64 
1E7E:C9 38 D@ BE 18 69 48 BD 2D | SFFa:28 BB GO 3C BB BB FO GO DB | FE5G:G1 BO BO G1 BB GO Ol EO DF 


1E86:F8 67 AS 81 8D 12 D4 4C FS @E58:86 61 AG 64 Bl FB 64 G3 FF 
LESE:9B 1E 38 E9 48 8D F8 87 37 @E6O:F8 OS FF CO 03 FF OB B3 61 
1E96:A9 00 8D 12 D4 4c 65 Fa 18 | Program 4: Pig$ For Buck$— GEGB:FF 08 O3 FE 00 03 FE 08 DE 
1E9E:00 OE 40 BE 80 BOE CO BE 13 PIG.SPR2 ®E70:01 FE 88 @3 F2 O68 O2 OC Ad 


1EA6 100 OF 40 OF 80 OF CO OF 70 GE78:00 06 00 OO 08 OB OB OB 94 
LEAE:08 28 40 20 86 20 CO 20 23 | GEOG:00 FF OO O03 FF CO OO FF 4F | GE8G:00 OB OO BO BO BB OB OB 9C 
1EB6 108 21 40 21 80 21 CO 21 80 | gEGB:00 Go 7D G8 OF 96 FO 3F C7 | 9EB8:00 OO OB BO OB OO OO OO Ad 
1EBE:85 C3 18 65 C3 AA BD 9E EA | GE10:BE FC FF BE FF 53 BE CF 51 | 8E90:00 88 89 80 80 61 OO OO BO 
1EC6:1E 85 FA BD 9F 1E 85 FB 2B | GE18:52 AA BF G2 AA BF G2 AA SC | GE98:00 BO BO B7 BD BO OS Bd D3 
1ECE:BD AE 1E 85 FC BD AF 1E BE | 9E20:85 02 AA 85 G2 AA 80 G2 EA | SEAG:@8 1F BO 16 1F CO 20 03 D4 
1ED6:85 FD A9 68 85 C3 AO 48 59 | GE28:AA BO O2 82 BH G2 82 BG B3 | SEAStFF AM OO FF CO OB FF CW B3 
1EDE:85 C4 AG 60 AG C3 FO BE 57 | GE3G:02 83 FO 02 80 0 G2 80 F4 | GEBO:O0 FF CO OO 7F CO OO 7F 63 
1EE61B1 FA 91 FC C8 DO F9 E6 21 | 9£38:00 OF CO OO 3F CO BO 68 2D | FEBB:80 OO SF 89 BB 40 BO OB OB 
1EEE:FB E6 FD CA D@ F2 A6 C4 B3 | GE40:03 FF OO OF FF C@ 03 D7 AF | SECO:08 BO OB 6G 66 OO BO OB DC 
1EF6:FO 98 Bl FA 91 FC C8 CA 70 | 6E48:08 03 55 66 G1 55 66 BO 2D | BECB:8B BB BB BB BB OO OO OO E4 
1EFE1D0 F8 68 88 OO 88 GB BB ED | GESG:BC GG BB BC OG G3 BF D4 FG | GEDG:8O OO OB BB BB B7 BD BG 52 
GE58:0F AF D4 3F AB 68 14 AB Bc | BEDS:65 BO OO 1F BB 26 1F CO BD 
> BE60:00 14 AB BO GB AA OG GO 41 | GEEG:20 03 FF AD OO FF CO OO 59 
Program 3: Pig$ For Buck$— @EGB:AA OG OB AA BG G2 A2 8B 56 | BEES:FF CO OO FF CO OO 7F CO FA 
PIG.SPR1 GE70:0A 82 88 BA 02 BO 28 G3 69 | GEFG:00 7F 80 OO 4F BB BO 30 Ad 

e GE78:FO 3C 00 OO GF OO G8 00 94 | BEFS:48 OB OF BO BO BD BO O6 35 
8£00:08 FF 00 63 FF CO 60 FF 4F | GE80:03 FF 00 OF FF CO G3 D7 EF | OFO0:00 FF 68 63 FF CO 00 D7 29 
BEG8:00 68 7D BB GF 96 FO 3F C7 | GE8B:00 G3 55 OH O1 55 GO OO 6D | BFOB:08 BB 7D BB BF 55 FO 3F C4 
@E10:BE FC FF BE FF F3 BE C5 C9 | GE90:BC 66 BO BC GO O3 BF D4 37 | OF1G:BE FC FF BE FF F3 BE CF D5 
@E18:F2 AA 85 F2 AA 80 52 AA DE | GE98:GF AF D4 3F AB OG 14 AB CC | OF18+F2 AA BF F2 AA BF 52 AA SE 
@E20:80 52 AA 8B G2 AA BB G2 2C | GEAG:00 14 AB OO BO AA OG GO B1 | OF20:85 52 AA BS G2 AA BO G2 O1 
@E28:AA 88 62 82 88 62 82 BB B3 | BEAB:AA GO OO AA BO B2 A2 BO 96 | OBF2B:AA BO G2 B2 BO O2 B2 BO BS 
GE30:0F C2 80 68 G2 80 OO G2 AB | GEBO:OA 82 80 GA G2 BG 28 03 49 | OF3G:62 A2 BO 2 82 BO 2 82 BC 
8E38:80 08 63 FO 8 63 FC OO GA | BEBS:FO 3C OO OO OF OB OO OO D4 | OF38:80 OF C3 FO 3F C3 FC OO E4 
@E40:03 FF 00 OF FF CO 3 D7 AF | GECO:63 FF 66 OF FF CO 63 D7 30 | OF40:00 FF 66 63 FF CO 60 D7 69 
9E48:00 03 55 86 G1 55 BB OO 2D | BECB:00 G3 55 OO G1 55 GO OB AD | GF48:00 BO 7D BO GF 55 FO 3F 65 
@E50:BC 88 BB BC BO G3 BC GB 1c | BEDG:BC 66 GO BC 66 O3 BF D4 77 | OFSO:BE FC SF BE F5 53 BE C5 25 
GE58:0F AF 00 OF AF CO O5 AB OF | GEDS:OF AF D4 3F AB GO 14 AB BD | GFSB:G2 AA BG G2 AA BO G2 AA 5B 
GE60:50 65 AB 58 BB AB BO BB A2 | GEEG:GB 14 AB BO BO AA OG OB Cl | GF6G:8G 62 AA BO G2 AA BO G2 5A 
@E68:AA 68 BO AA 6B 62 AA BG El | GEEB:AA OO GB AA BO G2 A2 BO D6 | BFEB:AA BO G2 B2 BB G2 82 BB FS 
9E70:62 8A 66 62 BA OO 02 BF 38 | BEFO:0A 82 8H GA G2 BO 28 63 89 | GF76:0A BO AD BA BO AD OF OO EB 
GE78:00 03 CF CO 03 FO B8 OB 37 | GEFA:FO 3C OO OO BF BB BO OO 15 | BF78:FO 3F OB FC BB BB OB BB AE 
9£80:63 FF 08 OF FF CO 63 D7 EF | OF00:00 FF 60 G3 FF CO OO D7 29 | GF8G:08 OO OB OO FF OB 53 FF 45 
GE88:08 03 55 BB G1 55 G6 GO 6D | GFB:00 BB 7D OO OF 55 FO 3F C4 | GFBB:C5 50 D7 O5 FO 7D OF FF 84 
@E9G:BC OO GB BC GO G3 BC GO 5C | GF1G:BE FC FF BE FF 53 BE CF 53 | OF90:55 FF 3F BE FC OF BE FO BF 
@E98:0F AF OB OF AF CO O5 AB 4F | GF18:52 AA BF 62 AA BF G2 AA SE | GF98:G2 AA BB B2 AA BB G2 AA 98 
@EAG:50 65 AB 5B GO AB BO OG E2 | GF26:85 G2 AA BS O2 AA 8G G2 EC | GFAG:BO O2 AA BB G2 AA BB G2 9A 
BEAS:AA BG GD AA GO G2 AA BO 22 | GF28:AA 86 G2 82 BO G2 82 8B BS | GFAB:AA BG G2 AA BB BA G2 AG FB 
BEBO :82 BA GB 62 BA OO G2 BF 78 | OF30:02 83 FO 62 BB BB 62 BO F6 | GFBO:3A GBB AC 3E BB BC 3E BB D4 
GEBB:00 03 CF CO 03 FO BB BB 77 | OF3IB:69 BF CO OG 3F CB BB GO 2F | BFBB:BC BB BB BB BB BB BB BB 35 
GECO:03 FF 68 OF FF CO 63 D7 30 | OF40:03 FF 20 OF FF CO 93 d¥ 39 | GFCB:08 OB OB 58 OO O5 50 FF 98 
BECB:08 03 55 6B O61 55 BO BG AD | BF48:60 G1 57 BO G1 55 GO BO EE | SFC8:05 F3 FF CF FO D7 OF FC 65 
BEDS:BC G8 GB BC OB B3 BC BB 9C | GFSG:FS GO GD FS GO G3 FB OO 7E | GFDS:7D 3F 3F 55 FC 3F BE FC 1A 
@EDS:0F AF 68 GF AF CO 95 AB 8F | GF58:03 EB CO OF EB CO 17 A9 36 | OFD8:GF BE FO 62 AA 83 C2 AA FP 
GEEG:50 O5 AB 58 BG AB BG GG 23 | BFEG:4B 14 AY 40 BB AB BB G2 81 | SFEG:8G GE AB BC 92 BA BO 3E 3B 
BEEB:AA GB GB AA BB 62 AA BB 62 | GF6BrAB BG G2 AB GB G2 AA GO G3 | GFEB:AA BC FE EA BF FE AA BF 29 
@EFO:02 8A BB 62 BA OB 02 BF BB | BF7G:02 BA OG 62 BA OG G3 CA 77 | OFFO:FE AB BF EA EA AB FA BE DA 
BEF8:00 03 CF CB 03 FO 88 88 B7 | OF78:00 GF CF OO OO 3F OB OO 51 | OFFB:AF FA FF AF 3B FF EC @@ 5C 
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Authorized Liquidator 
er 


BIG SAVINGS! SOLID OAK 
COMPUTER FURNITURE! 


Organize your computer equipment 
for more efficient operation 

by using these attractive 

matching furniture pieces! 

The manufacturer decided to discontinue 
these models when new styles were added 
toits line. As a result, we are able to offer this 
contemporary SOLID OAK furniture at unusu- 
ally low prices! All pieces come ready for 
easy assembly, 


COMPUTER DESK 

Sturdy solid oak framework with attractive 
curved front edge. 

 Non-glare slate-look work surfaces. 

10” x 31” hutch and main work area. 

© Hutch rises 7%” above main work area. 

© Size: 37" H x 31” Wx 23" D. 


Mfr, List $121.00 $ 


Liquidation Price. 
lem H-1519-4963-005 Ship, handling: $9.00 


PRINTER TABLE 

© Provides extra storage space you need in 
a functional manner. 

© Sturdy solid oak framework with attractive 
curved front edge. 

© Non-glare, slate-look work surface on top 
shelf 

© Large bottom shelf with paper feed 
(20%" x Ye"), 

@ Size: 28" H x 23%" W x 24%" D, 


Mfr. List: 115.00 S 49 


Liquidation Price 
Item H-1519-4963. ip, handling: $9.00 


MOBILE POSTURE CHAIR 

© The answer to sitting fatigue. 

© Special design lets you sit up naturally 
straight. 

© Helps reduce effect of gravity on your back 
muscles. 

© Fully padded knee rest and seat allow you 
to sit in comfort for hours. 

© Ideal as computer or typing chair. 

© Chair swivels and rolls on casters for easy 
mobility. 

© Sturdy solid oak five-blade base. 

© Handsome brown upholstery. 


Mfr. List $110.00 $ 49 


Liquidation Price. .... 
item H-1519-8150-005 Ship, handling: $9.00 
Pseno To: — Tom H-1510- 
1 C,.0.M.B. Direct Marketing Corp. 
1408 Xenlum Lane No./ Minneapolis, MN 85441-4494 
J Sendine toms inaicatd below, (Minnesota resident ada 
6% sales tax. Sorry, no C.0.D, orders) 
|. Computer Desk(s) Item H-1519-4963-005 at $59 
jus $9 each for shipping, handling 
‘Printer Tabie(s) itor H-1519-4069-019 at $49 
‘each plus $9 each for shipping, handling, 
| Send.—.Posture Chair(s) item H-1519-8150-005 at $49 
‘each plus $9 each for shipping, handling, 
TC my check or money order is enclosed. (No dolays in 
processing ordors pad by check thanks 10 TeleCheck} 
Ccharge:Cd Visa® CI MasterCard CJ American Express® 
| Acsitio exp. 
PLEASE PRINT CLEARLY 
| tae 
Address 
1 City 
Saar 
(i a 


Sign Hore 








bug-swettar 


© Because strings are limited to a 
maximum length of 255 characters, 
“Sequential File Editor’ (July) may 
crash with a STRING TOO LONG 
error in line 190 when a file con- 
tains 256 or more characters with- 
out a RETURN character (CHR$ 
(13)). The following line will allow 
such files to be read into the 
program: 

205 IF LEN(AS(LN)) = 255 THEN PRINT 

AS;: GOTO 230 


Note that if you add this line 
and subsequently read a file and 
write it back to disk, the new file 
may contain some additional CHR$ 
(13) characters, 


© Reader Michael D’Alessio noticed 
that two characters in ‘’Pirate 
Cove” (August) were misprinted. 
The L and @ in line 1560 should 
have been underlined, indicating 
that they are shifted characters. 


e “Address Cataloger’’ (August) 
works as published. Certain print- 
ers, however, print a few garbage 
characters just before the name 
field. Readers who encounter this 
problem should POKE 3173,255 
before running the program. Also, 
if you’d rather have the ZIP code 
printed on the same line as the 
state, POKE 5173,32. Readers who 
own daisywheel printers may find 
that underlining causes a series of 
C's to be printed. To fix this, POKE 
3371,45. To make any of these 
changes permanent, load Address 
Cataloger, enter the POKEs, and 
save the program back to disk un- 
der a new name. 


© The printer which makes program 
listings continues to insert an un- 
necessary question mark now and 
then. Line 170 of “128 Sprite Rota- 
tor” (August) should end with 280, 
not 2780. Also, the question mark 
should be removed from RE?TURN 








Modifications and Corrections 


COMMODORE PLUS/4= 
COMPLETE 


COMPUTER SYSTEM 
AT BELOW DEALER COST! 


NOTE: Monitor not 
available. Tho Plus/4™ 





in line 540 of “Queen’s Quarrel” 
(une). 


e@ Some readers who own RGB 
monitors have asked how to 
change the character color in 
“SpeedScript-80."’ Load the pro- 
gram from 64 mode and POKE 
4463,xxx, where xxx is a number 
between 128 and 143. To change 
the background color, use the 
COLOR command from 128 mode 
before loading SpeedScript-80. 

Reader Donald E. Fulton has 
suggested a couple of useful modi- 
fications. POKE 2270,71 changes 
the 80-column display to 70 col- 
umns, so what you see on the mon- 
itor is what will be printed. If you 
change the margins, add one to the 
new column width and POKE it to 
2270. Also, to speed up typing, 
POKE a 234 to each of the three lo- 
cations 2795-2797. 


@ The Voyager 2 spacecraft has dis- 
covered some new facts about the 
planet Uranus, including the exis- 
tence of at least ten previously 
unknown moons. Readers who 
typed in “‘Solarpix” (June) may 
want to modify the program. 

In line 2440, change 14.5 to 
14.6, In line 2510, change .67 to .72. 
The 5 in line 2710 should be 
changed to 15. And ten X’s separat- 
ed by commas should be added to 
line 2770, to represent the ten, as 
yet unnamed, moons. @ 


COMPUTE"s 
GAZETTE 
TOLL FREE 
Subscription 


Order Line 
1-800-247-5470 
In IA 
1-800-532-1272 








‘can hook up to your TV. 


Ideal for home or 
business! Perfect 
Factory new! tet te! 
Factory warranted by Commodore®. Built-in 
software for word processing, data process- 
ing, spreadsheets and 128 color graphics! 
Commodore® designed this Plus/4™ specifically for program- 
mers and small businesses! And then they made it VERY EASY 
to learn and use for novices. Popular business software is 
available for a variety of purposes. For programmers, this 
machine has easy-to-use powerful commands and 60K of 
usable memory. Can hook up as many as four disk drives. 
Team up the computer with our compatible units of famous 
brand, factory reconditioned and warranted DISK DRIVE and 
DOT MATRIX PRINTER! Sorry, we can't printthe brand name of 
the disk drive and printer. But phone us Toll-Free and we can tell 
you. With Disk Drive for data storage and Printer for “hard 
copies”, you'll have a complete system...at low liquidation 
prices. Order TODAY! 
Units sold individually or in any 
combination you desire. 


PLUS/4 COMPUTER 


tem H-1507-5035-001 Ship, hand: $8.00 


DISK DRIVE 


Mem H-1807-3553-013 Ship, hand: $8.00 


PRINTER 
tem H-1507-3831-005 Ship, hand: $7.00 |$200.00 
TOTAL 


COMPLETE SYSTEM |‘ 
WITH 20 FREE FLOPPY DISKS 


Total Original List ... $827.90 





B. Direct 


Send. 


Additional Features of 


f 
COMMODORE PLUS/4 


Data base of 999 recor 
puter holds 99 li 


windowing capabilities Compat 
ible with all Commodore hard- 
ware except joystick and dataset, 
NOT compatible with C64 
software, 


DISK DRIVE 
r 


‘age of 170K formatted data: 
tact 


DOT MATRIX 

PRINTER 

Bi-directional 6 x 7 dot matrix 
f. 60 characters por 
upper and lower 


arketing Corp. em H 
11405 Xenium Lane No./ Minneapolis, MN 55441-4408 


J Send the following itoms. (Minnesota residents add 6% salos 
tax. Sorry, no COD. orders) 
MPLETE SYSTEM(s) Commodore Plus/4", Disk 


Drive, Printer and Floppy Disks. hem H-1507-5035-019 at $339 


Liquidation 


tem H-1507-5035-019 Ship, hand:'$19.00 
plus $8 each for 3 


Sines 5 doy, Manga eee ae $7 each for ship, handing, 


$339 | oo nunetaeanprt ce naa 
‘Send__COMMODORE PLUS /4 
Priced At Only. . . 1 5035-001 at $79 each plus $8 each for ship, handling, 
| Sond.—DISK DRIVE(s) item H-1807-3553-013 at $149 each 
han 
1 Send___PRINTER(s) tem H-1507-3831-005 at $119 each plus 


SOMPUTER(:) Item H-1507- 


ling 


CIMy check or money order is enclosed. (No delays in 
1 processing orders paid by check, thanks to TeleCheck) 
| Charge: visa® CO MasterCarde C] American Express® 


Sales outside contiguous 48 states are subject to 
‘special conditions. Please call or wrtte to inquire. 


CS OMB) pirectmarketing corp. 


[ ecto 

PLEASE PRINT CLEARLY 
Name 

1 Acsress 

| ow 


Exp. 





Authorized Liquidator iss: 


1405 Xenium Lane North ! 
Minneapolis, Minnesota 55441-4494 


up 


Phone —( 


6 —— 





Sensational Prices! 
On Our Most Popular Items! 


From microf” .. 


THE 99C piskETTE! 


‘Aro you paying too much for diskettes? Try our first 
quality, primo, 5Y4" diskettes (no rejects, no seconds) 
at these fantastic sale prices and save, save, SAVE! 
Disks are packaged in boxes of 50; each box contains 
5 shrink wrapped 10-packs that include diskettes in 
sleeves, labels, and write-protect tabs. 


Each diskette is certified to be 100% error free and 
comes with a lifetime warranty (if you have a problem, 
‘well replace the diskette). All diskettes include hub rein: 
forcement rings and write-protect notch, 


St@\r’ BMC AXIOM INDUS 

= ut EPSON CARDCO 

Wo can offer you some of the lowest prices in tho country on the most popular printers, mon- 
itors and interfaces, Our normal prices are already low, but to make sure you got the best deal 
you can, we will also meet most competitive prices in this publication when placed on an equal 
basis (Remember—we don't charge for use of your credit card, impose excessive shipping fees, 
or use any other hidden extras to boost the price you pay. Due to the rapid change in prices in 
the computer industry, we can only meet prices at the time you place your order; we cannot adjust 
prices on items ordered or shipped on an earlier date.) Another plus for charge card customers 


— your charge card is billed al time of shipment only for the items shipped — no early billing, 
no long wait for the merchandise you already paid for. 


COMMODORE STAR MICRONICS FAMOUS NAME SOFTWARE 
C-128" Computer $CALL NX10 SCALL Epyx 
1871 Disk Drive SCALL 8G-10C SCALL Broderbund 
1902 Monitor SCALL  CARDCO Infocom 
1670 Modem SCALL  “G.Wiz Interface $CALL_—Sierra 
SS, DD Diskettes, Box of 50 EPSON S'MORE SCALL —Timeworks 
| FX-85 SCALL Super-G SCALL Random House 
32391 $29.50-s9¢ ea. FX288 SCALL fis Activision, and many more! 


COMMODORE-READY PRINTER ONLY $41495] 
‘antex 

80-column dot-matrix printer from Smith-Corona 

includes intertacecabe no other Interface needed), 

80 cps, bi-directional printing, friction feed (tractor 

optional, six character sizes, some graphics 

capabilites 


‘All diskettes are double donsity and work in either 
single or double density drives. 





DS, DD Diskettes, Box of 50 
32403 $34.50-69¢ ea. 
* THE BEST PRICES * 


‘ THE BEST SERVICE * 
WHY SHOP 
‘ANYWHERE ELSE? 


POWER and PROTECTION 
FOR YOUR C-64!© 


POW’R PAK 64 #,"ca 


Pow'r Pak is a replacement power supply (1.5 amp) 
for the Commodore 64" . . .but that's not all! Pow'r 
Pak also supplies two additional surge protected out- 
lets (120V) for monitor, disk drive, or other peripher- 
als. On/off switch. Fuse protection, Sturdy all-metal 


OUR BEST MONITOR VALUE EVER! 


The black mati plctue tube on this 147 compo 
site monitor provides impressive color rich 
goin po ogee 0, @4 AQ. O5 
tultn audio speaker, controls fr volume, Bright 
ness, contrast, color tnt and sharpness. One year 
warranty on pars and labo, 2 years on picture tube 
Aitor only), or 40-column monochrome. ot | From Samsung. Supply Limited! Order Today! 
80 coun monocrrome. Agreat maytouse | oro penal 
ing {s ventilated for heat dissipation. Full 1 year 80-columas on the C-128 without the ‘ 
cong is venbieled forsee esinaver yee ‘expense of an AGB monitor! No other cable | Monitor Cable (required), Works with C84, C128 (in 
Y requies ‘composite mode), TI 99/44 and many others 
34910 $49.95 ‘am seags | 7428 5795 


80-COLUMNS ON YOUR 


COMPOSITE MONITOR! 
Switch Selectable 

‘Our new cable connects your C128 0 ary 

‘colo oF monochrome monitor and let you 

‘witch selet 40-clumn color (color mo 


DUST COVER and 


CARTRIDGE EXPANDER 


Plus $22.95 
FAST LOAD 
OFFER! 


Stop wring ou your computer by endogs cargo swapping! 
Tho Navarone cartridge expand 

the computer in jontly of th powor switch. Cartridge 3 
fare vortical for easy access — no blind fumbling behind the 


“EVERYTHING BOOK” 
SPECIAL OFFER 


Got to know us by ordering this groat dust 
over for your C64 or 128 and ou catalog, 
"The Evorything Book for tho C-64 and C-128 
Home Comput for $295 (no extra. ship- 
ping and handling charges). Cover is antistatic, 
tranalvcant8-gauge vinyl sown o our exacting 
standards with reinforced seams. Discov the 

nge and easy, shipping avalabe rom 


The Right Interface For All 
Your Printing Needs! 


G64and fee 20 emulates aommodoe pine Comes with 
‘ables and user's manu 


93565........ . $39.95 


Bultin butter provides super high 
‘speed printing for parallel printers. 


Interface Fins Si Commodore cnaractes 
Cables and connectors included, From Caréco. Lifetime 
warranty 


G\ § 34484 2¥¢  SCALL 
P] SOPERS sisuoyaseromoawizorire more 
JP { speed. toe butter and an 18" ribbon cable. From Cardeo 


31027 Co Ce Dust Cover and cat oa cy tet guaranty. 
38464 C-126 Dust Cover and Ganaioy (Giu) 40502 $CALL 


computor 
39227 S-slot Cartridge Expandor $22.95 Tene a ‘press! 


‘Toe carvidge expander isa great companion tor the Epyx Fast Load 
cartridge — you can keep it permanently installed plus have two 
‘ides fee for other cartridges! 

34246 Fast Lond Cartridge (Sug. Retail $9995) $24.95 


Fast Load Only $22.95 
with purchase of cartridge expander! 


SHIPPING CHARGES. 
From Your Friends At Wergiey, epee! ORDER AMOUNT CHARGE 
TENEX . loss than $20.00 $3.75 
ute’ P.O. Box 6578 '$20.00-$39,99 4.75 
South Bend, IN 46660 $40,00-$74.99 5.75 
Questions? Call $75.00-$149.99 6.75 


= 219/259-7051 S008up ans 


CACO sp nea: COONEY Conair ecm. For Orrs $4.00, Har us shi a ac coe 


NO EXTRA FEE FOR CHARGES 


WE VERIFY CHARGE CARD 
ADDRESSES. 


ORDER TOLL FREE 
1-800-348-2778 














A Printer For 
All Reasons 


Search For The Best 
High Quality Graphic Printer 


The Results Are In| We ran many printers through 
our battery of tests and this one came out first in its 
class. Our SP-1000, built by Seiko is a 100 characters 
per second, (12 horizontal by 9 vertical matrix), full bi- 
directional, logic seeking, true descender printer. The 
character matrix in NLQ (Near Letter Quality) mode is 
avery dense 24 (horizontal) by 18 (vertical). 


Features That Won't Quit With the SP-1000 your 
computer can now print 40, 48, 68, 80, 96, or 136 
characters per line. You can print in scores of style 
variations, You not only have standard Pica, Elite, 
Condensed and Italics, but also true Superscripts and 
Subscripts. Use bold, or italics to make the words 
stand out. Or, if you wish to be even more emphatic, 
underline the words. You can combine many modes 
and styles to make the variation almost endless, 


Forms? Yes! Your Letterhead? Of Course! 

The tractors are adjustable from 4 to 10 inches. You 
can also use single sheets, plain typing paper, your 
letterhead, short memo forms, labels, whatever you 
choose. Any size to 10" in width. It will even load your 
paper automatically, Multiple copies? Absolutely! Use 
forms up to 3 thick. Spread sheets with many 
columns? Just go to condensed mode printing and 
print a full 136 columns wide all on a standard 8%" 
wide page. Forget expensive wide-carriage printers 
and having to change to wide carriage paper. 


An Extra Long Life (2.5 million character) ribbon 
cartridge is only $11.00. Order #2001. You need 
absolutely nothing else to start printing—just add 
paper (single sheet or fanfold tractor). 





The warranty has now been extended to 2 years and 
service centers are located nationwide for your 
convenience, 


The Bottom Line: 


Commodore C-64 & C-128, Order #2200. graphics 
interface & cable built in. $169.95 

IBM-PC and compatibles, Order #2100, $189.95 
plus 8' shielded cable #1103, $16.95 

Apple lic or Macintosh, Order #2300, $194.95 
with cable, specify computer 

Standard Parallel with 36 pin Centronics connector. 
Order #2400, $189.95 no cable 

Standard Serlal with RS-232 (DB-25) Connector, 
Order #2500, $189.95 no cable 

Be sure to specify the order # for the correct version 

printer designed for your computer. 

Interfaces and cables for other computers. 

Call 805/987-2454 for details. 


Shipping in cont. US is $10.00. UPS Blue is $22.00. 








Letter Perfect 


Now! Full Feature, 20 CPS, 
Letter Quality Printer only $279.95 


For those who need a Daisy Wheel Printer, our 
Daisy 1120 has itall. To start with, it has a front 
control panel with indicators for Pitch Selection which 
allows for 10, 12 or 15 pitch or Proportional Space print- 
wheels. There is a Select (Online) button with indicator 
and a Line Feed button. You can also set Top-of-Form 
or Form Feed with the touch of a button. Other indi- 
cators include Power and Alarm. The built in 2K buffer 
allows a page or two of concurrent printing and use of 
your computer for the next job. To really take advan- 
tage of your printer's optional features, the automatic 
Cut Sheet Feeder elimi- 
nates tiresome single 
page handling as) 9 
and the adjust 
able Tractor 
Feed option 
handles all con- 
tinuous form paper. 
Best of all the Daisy 
1120 is quiet: only 58 dB. 
Total Compatibility The Daisy 1120 uses 96 
character Diablo" compatible printwheels, At 15 
pitch you can print 165 columns—a must for 
spreadsheets. 

The Daisy 1120 uses the Diablo Hytype ||" 
standard ribbon cartridges, also universally available. 

Not only is the hardware completely compatible, 
the control codes recognized by the Daisy 1120 are 
Diablo 630* compatible (industry standard). You can 
take advantage of all the great features of your word 
processing package and automatically use 
superscripts, subscripts, automatic underlining, 
boldface and doublestrike 

The printer has a set of rear switches which allow 
the use of standard ASCII as well as foreign character 
printwheels. Page length can be set to 8, 11, 12, or 
15". The Daisy 1120 can also be switched to add 
automatic line feed 

Try the Daisy 1120 for 2 weeks. If you are not 
satisfied we will issue a prompt refund, 1-year parts 
and labor warranty is included 


The Bottom Line Aprotek Daisy 1120 (Order 
#1120) $279.95 w/standard Centronics parallel 
interface, 2K buffer, ribbon and printwheel 
Shipping in cont. US is $11. UPS Blue is $24 


Options: Compare our prices! 

Auto Cut Sheet Feeder (#1110) $185. Shipping $7 
Bidirectional Tractor Feed (#1112) $75, Shipping $5. 
Interfaces for most computers are available—call 
ORDERING INFORMATION California residents add 
6% tax. All prices are cash prices — VISA and MC add 3% to 
total. We ship the next business day on money orders 
cashier's checks, and charge cards. A 14-day clearing 
period is required for checks. Prices subject to change— 
CALL. Dealer inquiries invited. 


For information call 805/987-2454 
TO ORDER CALL TOLL FREE 


1 (800) 962-5800 - USA 
1 (800) 962-3800 - Calif 


Or send order to 


= APROKK oer 


1071-A Avenida Acaso, Camarillo, CA 93010 







(8-8 PST) 








First, Fast... 
and Still the Best! 


We're the first company to offer fast, expert Commodore 
service anywhere in the USA. And we're still the best! 


For one low price, we repair all problems on most types of Commodore 
equipment. All regular repairs carry a 30-day warranty, with a full-year warranty 
available for only $30 more. For preventive maintenance, we also offer a 1-Year 
service Contract at a savings of $20.00. Check our low prices! 

Repair with Repair with 1-Year 

30-day Warranty 1-Year Warranty Service Contract 
C-64 or C-128 Computer $59 $89 $69 
1541 or 1571 Drive 65 95 75 
1702, 1802 or 1902 Monitor 75 105 85 
MPS-801, 802, 1525 or 1526 59 89 69 
1541 or 1571 alignment (only) Just $29.95 
And as an extra benefit — our repair customers are eligible for big discounts on software and 
hardware purchases. 
Call for best prices on Amiga, Okidata and Epson. 


FREE PERMANENT FIX 


A $69.95 value — includes alignment and modification to stay in 
alignment. FREE for a limited time with any 1541 repair! 





For fast, expert service ... 
Just call our toll free number today! 


1-800-624-6794 


(For your convenience, have your equipment serial number and credit number ready. 
ee and money orders also accepted). Add $7.50 for shipping — includes two-day air 
service anywhere in the Continental USA. For APO-FPO and P.O. Box addresses, add 


$15.00 for shipping (excluding air freight). 


eh 
Ze 


TRIAD 
COMPUTERS 


voc 
(Kas 3402-E W. Wendover Ave., Greensboro, NC 27407 
1-800-624-6794 or (919) 299-0391 





COMPUTER CENTERS OF AMERICA 


FALL HARVEST 
() OF VALUES FOR ALL YOUR 
COMPUTER NEEDS 


GEOS” | sta 


GRAPHIC ENVIRONMENT 
OPERATING SYSTEM oe 


INCLUDES 
* 5 Different Fonts 
© deskTop 
* geoPaint 
& commodore * geowrite 


ae | cat eal aS 
FOR THI > 
S249 95 CALL FOR PRICE |now in rs : 
ee i 
“= MEMOREX SPECIAL $179% 


WORK STATION 
#20 Disks #Disk Case LV 1210 


© 120 CPS 




















YOUR § 19” © DOT MATRIX 
COST * FRICTION & TRACTOR FEED. 
= * NEAR LETTER QUALITY 
* CONTINUOUS UNDERLINE 
& commodore | WE ARE AN AUTHORIZED STAR REPAIR CENTER 
128 Paperback Writer 128 CALL FOR PRICES 


Paperback 


PERSONAL COMPUTER SS rests: | — DISKETTES 
$2 5995 SS Piecnar 128 Nashua .....-+ $g95 
Sa TP | SS YOUR CHOICE Scotch .. on 
WN ie 


INTERFACES 





29% tere 


for the Commodore 128 











PsPaliveasee 
















XETEC JR. E 
XETEC SR. EpyXx gar See $1995 A 
M.W. 350 10K BUFFER .... Karate * INCLUDES DELIVERY Quest... 
Kromis Rift = Lucas Games Temple of Asphai 
SP-1000 Eidolon - Lucas Games Tilogy Transylvania . « 
ry Baliblazer « Lucas Games Jet Combat Sword of Kadash 
© Builtin Commodore interface | | Rowe Fractalus « Lucas Simulator S 
year Watt ames Gl Joe 
® Near Leer Qualty Mode gu! Fastoad Sommer Games | or 
winterga Barb 
516995 4 ee _ meses 





SEIKOSHA , 
LUMITED TIME ONLY 
SPECIAL INTRODUCTORY PRICE 

Assembler D- . $27.95 


PROFESSIONAL Easy Finance |, Il il, IV-D. $19.95 

Fleet S t 2 Bey Cale-D . $64.95 

system asy Script $39.95 

Easy Spell... $19.95 

The Largest Spell Checker eas es —— 

Avaliable For Your Computer SIXOYIS | trekinagero | $952 | Cxcommodore 64= PACKAGE 
90,000 Words on C-64/128 INCLUDES: 


General Ledger... $3795 
70,000 Words on Atari Accts Rec-D .... ‘ + $37.95 Commodore 64 Computer 





= commodore 












5 3 Accts Pay -D $37.95 *Commodore 1541 Disc Drive 

Fleet System 3 ° Magic Desk-D $52.95 * A Color Monitor with Cables 
Silent Butler $2495 

FOR COMMODORE 128 “G45 | seine $27.00 CALL FOR PRICE 

Check, Money Order, MC or VISA accepted. No 


additional charge for MasterCard and Visa. Call for NEW YORK STATE CALL TOLL FREE 
shipping and handling Information / NYS residents MN oocart }-2760 fe 516-349-1020 
add applicable sales tax / Prices and avallability are (OR WRITE: COMPUTER CENTERS OF AMERICA 
subject to change without notice / All factory fresh 8} TERMINAL DRIVE, PLAINVIEW, NY 11803 
merchandise with manufacturer's warranty. Dealers COMBUTER CENTERS 
Welcome, Call for recent price reductions and'new OF AMERICA 1 -800-63 1 -1 003 
rebate Information. Plus shipping and handling. No 

81 TERMINAL DRIVE 1-800-548-0009 


retums without return authorization number. 
*IN CONTINENTAL USA ONLY. APO PLUS FPO EXTRA. PLAINVIEW, NY 11803 


|When you want to talk computers 
| When you want to talk price. 


AMIGA 
1080 
Hi-Res RGB 
MONITOR 


$259°9 


Star Gemini 
$L10-C 
PRINTER 
for 
C64 & C128 


$2 1 oe 


Cea 


|, Super Expander 


Assembler 


Screen Editor 


YOUR CHOICE 


Commodore 
1670 Modem 
300/1200 Baud 


Auto Answer/Auto Dial 


°149° 


Micro R&D 
MJ350 
Super Graphics 
Interface 64/128 


*49° 


AMIGA 
TEXTCRAFT 


$5q° 


GRAPHICRAFT 


Commodore 
1541 
DISK DRIVE 


$4 79° 


“GEOS” 


Graphic Environment § 
Operating System ff 
64, 64C & 128 


$4999 


Compu-Cover } 

VIC 20 & C64 
Keyboard Cover/ 
Document Holder 


COMPUTER MAIL ORDER 


CALL TOLL-FREE 1-800-233-8950 


477 East Third Street, Dept. A413, Williamsport, PA 17701 


age INSTITUTION: a “FREE 1-800-221 Pet 


the terms and ints of the 


Sie 
1-800-268.9974 1-800-268-4559 CANADIAN ‘ORDERS 1-416-928-0866 





LEROY’S CHEATSHEET* 


KEYBOARD OVERLAYS 


COMMODORE 64 
CUT-OUT-YOURSELF ON DOTTED LINES 
BASIC WANAGER SMART 64 TERMINAL 
BLANKS (att of 3) ( OMNIWRITER SPEEDSCRIPT 


COMMODORE 128" CALC RESULT ADVANCED PAPERCLIP SPRITES ONLY 


CALC RESULT EASY PILOT SUPERBASE 64 
DIE-CUT COMAL PRACTICALC I TERM 64 


CONSULTANT PRACTICALC 64 VIOTEX: 
CIBASIC 7,0) UFOR THE) BEGINNER DISK 1541 FOR THE BEGINNER VIP TERMINAL 


CI BLANKS (pol taminates. QMULTIPLAN DOODLE HES MON 64 VIZASTAR 
O pisk 1571 CipaPeR CLIP 128 EASY CALC HES WAITER WRITE NOW! /04 
CD easy SCRIPT DSuperBASE 128 EASY SCRIPT MULTIPLAN 801/809 PRINTER 


FLEET SYSTEM 2 SCRIPT 64 1626/802 PRINTER 
EUR CCE TAG YSTEN 3b TEL WORGRRO 128 FLIGHT SIMULATOR II SIMONS' BASIC EPSON AX/FX 60 


FREE Keyboard Extender With C-128 Order LOGO sheet 1 SKY TRAVEL GEMINI 10, 15X 
Loco sheet 2 OKIDATA 92/93 


yew =o PAPERBACK WRITER O ELITE 0 GEOS WORD WRITER 
A LEROY'S CHEATSHEETS"are durable plastic laminated keyboard overlays designed for use 
V SAVES TIME ~ ENDS FRUSTRATION with popular software, hardware, and languages for the Commodore 64 and 128. 
V GET TO KNOW YOUR SOFTWARE BETTER When laid on your keyboard, LEROY'S CHEATSHEETS Surround the keys with essential 
information, placing your most valuable computing tool at your fingertips, 
V FITS OVER KEYBOARD 
We take time to learn and use each program before designing a Cheatsheet, For quick- 
V COMMANDS AT YOUR FINGERTIPS reference, commands are grouped according to function. The actual keystrokes are in 
UV LEARN NEW SOFTWARE FASTER, EASIER bold type and variables are shown in italics. ALL the COMMANDS are included, and many 


V STURDY PLASTIC LAMINATE extra shortcuts are added. 


Now you can use your software faster, more easily and more effectively. 
VAUHBEATABLESEEICEN With LEROY'S CHEATSHEETS You'll never have to hunt for a program command again. 


o:009000000000000 


SOFTWARE I! THE PROBLEM SOLVER 


NOW buy your SOFTWARE from LEROY at 20% OFFlist price EQUIPMENT STAND 


(hundreds of titles available) 
By LEROY 
SPECIAL OFFER 


Buy any software package (minimum $25.00 order) and get 
a FREE Lenoy's CHEATSHEET! your choice! 


SPECIALLY DESIGNED FOR COMMODORE COMPUTERS 


VINYL COATED - 1/4* DIAMETER ORGANIZE YOUR SYSTEM 
WELDED STEEL CONSTRUCTION KEEPS EQUIPMENT COOLER 


18" WIDE 4° HIGH 11° DEEP PERFECT FOR PRINTERS 
PUTS YOUR CRT AT EYE LEVEL 0 EQUIPMENT STAND 


SHIPPING OVERLAYS $1.00 ahipping per order US. & Canada SUBTOTAL —_______ SHIPPING 
‘AMO TERMS: $3.00 for foreign orders: 
STANDS $3.00 shipping EACH 48 states G%TAX Pa. nesioenrs. 
$5.00 Canada, Hawai, Alaska 
UStwneNOCOD. TOTAL OF ORDER 
MC/VISA* EXPIRES. 


CPi cueaTsHEeT prooucts Inc cae 
P.O. Box 111368 ADDRESS. 


PITTSBURGH, Pa. 15238 
(412) 781-1551 city. 























ATTENTION 


ALL COMMODORE 64, 
VIC 20, COMM. 16 AND 
COMMODORE 128 owners 


A complete self-tutoring BASIC programming course 
is now available. This course starts with turning 
your computer on, to programming just about 
anything you want! This course is currently used 
in both High School and Adult Evening Education 
classes and has also formed the basis of teacher 
literacy programs. Written by a teacher, who after 
having taught the course several times, has put 
together one of the finest programming courses 
available today. This complete 13 lesson course 
of over 220 pages is now available for the COM- 
MODORE 64, VIC 20, COMMODORE 16 and the 
COMMODORE 128and takes youstep by step thru 
a discovery approach to programming and you 
can do it all in your leisure time! The lessons are fil- 
led with examples and easy to understand explanat- 
ions as well as many programs for you to make up. 
At the end of each lesson is a test of the information 
presented. Furthermore, ALL answers are supplied 
to all the questions and programs, including the 
answers to the tests. Follow this course step by 
step, lesson by lesson, and turn yourself into a 
real programmer! You won't be disappointed! 

We will send this COMPLETE course to you at 
once for just $19.95 plus $3.00 for shipping and 
handling (U.S. residents, please pay in U.S. funds). 
If you are not COMPLETELY satisfied, then simply 
return the course within 10 days of receipt for a 
FULL refund. 


ps Now available! a 200 page course 


OW UP % exclusively on sequential and rel- 
Wiehe ative files using a unique approach 
for those with very limited file programming ex- 
perience - set up your own personal and business 
records! — disk drive a must — same author — 
same guarantee — same cost— this course for 
all computers except Vic 20. 

Fill in the coupon or send a facsimile 


CG 









NAME 
ADDRESS:- 
CITY 
PROV./STATE: 


POSTALUZIP CODE = a 

I desire the BASIC program: Any complete course: $19.95 
ming course for: Postage and Handling: $3.00 
Commodore 64 () Vic 20 “1 Total: $22.95 
Comm. 128 (] Comm. 16 1 Send Cheque or Money Order to: 
| desire the FOLLOW-UP (1 Brantford Educational Services 
course on relative and seq- 6 Pioneer Place, 

uential files for all above Brantford, Ontario, 
computers but Vic 20). Canada N3R 7G7 























COMMODORE= 


PERSONAL 


CALL FOR COMPUTER 


1670 
MODEM . 


1750 RAM 
EXPANDER ... 169 


1350 MOUSE 
CONTROLLER .. 42.95 


1571 DISK DRIVE 
CALL FOR LATEST PRICE 


1902 MONITOR 
CALL FOR LATEST PRICE 


MPS 1000 
PRINTER .....5, 249 


COMMODORE 64C 
WITH GEOS.189 


1541 DISK 1802C 
DRIVE CALL =MONITOR .... 209 
1541C DISK 1660 


CALL MODEM... 49.95 
EST, 1982 


Computgtbility. 


‘ORDER LINES OPEN 
WON - FRI TT AM.- 7 PM. CST 
‘SAT12 PM = 5 PM.CST 


FOR TECHNICAL INFORMATION, 
TO ORDER CALL TOLL FREE ORDER INQUIRIES, OR FOR WIS, ORDERS 


800-558-0003 414-351-2007 


ORDERING INFORMATION FOR FAST DELIVERY SEND CASHIER'S CHECK MONEY ORDER OR 
DIRECT BANK TRANSFER, PERSONAL AND COMPANY CHECKS ALLOW 14 BUSINESS 
DAYS TO CLEAR. CHARGES FOR C 0.0. ARE $3.00. IN CONTINENTAL U.S.A, INCLUDE 4 
SHIPPING ON ALL ORDERS, MINIMUM S400. MASTER CARD & VISA ORDERS PLEASE 
INGLUDE GARD ¥. EXPIRATION DATE. AND SIGNATURE, Wi RESIDENTS PLEASE ADD $ 
TAX. HL. AK. FPO. APO, PUERTO RICO AND CANADIAN ORDERS PLEASE ADD 
MINIMUM 9: SHIPPING AND HANDLING. MINIMUM 8500, ALL OTHER FONEIGN OROERS 
PLEASE ADD MINIMUM 15% SHIPPING, MINIMUM $10.00. ALL GOODS ARE NEW 
AND INCLUDE FACTORY WARRANTY OUE TO OUR LOW PRICES ALL SALES ARE FINAL 
L DEFECTIVE RETURNS MUST HAVE A RETURN AUTHORIZATION NUMBER, PLEASE 
CALL 2007 10 OBTAIN AN RAW OR YOUR RETURN WILL NOT BE ACCEPTED 
FOR REPLACEMENT OR REPAIR. PRICES AND AVAILABILITY SUBJECT TO CHANGE 
WITHOUT NOTICE 
NOTE ON ALL ORDERS OUTSIDE CONTINENTAL U.S.A. WE SHIP ALL ORDERS FIRST 
CLASS INSURED US. MAIL. IF SHIPPING CHARGES EXCEED THE MINIMUM AMOUNT YOU 
WILL BE CHARGED THE ADDITIONAL AMOUNT TO 1 


fone) GET YOUR PACKAGE TO YOU QUICKLY AND SAFELY | 
®) NO SURCHARGE ON CREDIT CARDS 





PO. BOX 17882 
(MILWAUKEE, WI 59217 











COMMODORE 648128 © COMMODORE64&128 e COMMODORE 64&128 


NX-10 PRINTER & 
XETEC SUPER GRAPHIC INTERFACE 


$299 


This is a SHIPPED PRICE anywhere in continental USA 





PANASONIC 1091 & 
XETEC SUPER GRAPHIC INTERFACE 
$309 


This is a SHIPPED PRICE anywhere In conti 





28 Computer 1902A RGB Monitor 
1571 Disk Drive 1750 RAM Expander 
1670 Modem 1350 Mouse 
MPS 1000 Printer 
Call for Latest Prices 


SD-10.. 
SD-15. 
NXx-10 { . SG-15.. 
NL-10¢ Call SR-15. 


Commodore 64C W/Geos 











Commodore 64 
1541 Disk Drive 
1802 Monitor 
Call for Latest Prices 





PRINTERS 
Legend 1080......, 209 
Legend 808. 169 
Panasonic 1091... . 239 
Panasonic 1080... 215 
Silver Reod + Call 
Epson... 1 Gall 
Juki $510. « Call 
Toshiba 331 


Hacker. 
Mindshadow 
Borrowed Time 

Litt Comp, Peopie-- 
Music Studio . 
Mastertype 
Keyboard Cadet . 

VIP Professional 
Racter 

Analyze 
OnLine...5.. 
Scribbles... 
8BS-PC Bulletin Board, 
Archon 

One on One 

7 Cities of Gold... 


MONITORS 

NAP Amber ..... 89.95 
Commodore 1702. . Call 
Goldstar Color .. .. Call 
Toknika RGB... , Call 
Magnovox RGB... . Call 
Commodore 1902, , 280 


=e et 
COMMODORE 64 
SOFTWARE 
ABACUS 64 
Charipak ....... 
Cad-Pak 
Powerplan . 
Super C Compiler . 
Super Pascal 
Basic Compiler 
Forth... 
ACCESS 
Mach V-Cart 
Leader Board <1. 22.1127.95 
Tournament Disk’... .1695 
Tenth Frame .. «0.2. 2795 
ACTIVISION 
Gamamaker ..... 

Hacker .. 12095 
Computer Lil People. .:23:95 
Alter Ego 


Superbase 128 
Swittcale w/Sidewy 
Wordwriter 128 2... 
Data Manager Il, 

Floet System Ii 

Mach V/128 

Perfect Fllor 

Trinity. 


Colussus Chess. 
Advanced Music 

System ..... 
(ID sabosesbed 


31.95 
3195 
31.95 
5995 
fe MA 
29195 

31.95 


2195 





2195 


AMIGA COMPUTER SYSTEM 


Call for Availability and Pricing 
AMIGA SOFTWARE 


SKYOK veces Utima 3 A195 
Artic Fox... Maxiplan 9.95 
Marble Madness , Maxidesk 49.95 
Return/ Atlantis Maxicom 21. 3095 
Fin, Gookbook Flight Simulator... 3495 
Adventure Const. Silent Service «6.4. ,2795 
Chessmaster 2000 Mean 1B sess. ceccses 495 
Instant Music. Leader Board 2% 
Deluxe Print Winter Games 21% 
Deluxe Viceo Rogue 12795 
Doluxe Paint Apshal Tlogy 27.95 
Paint Utility 1. Strip Poker 129.95 
Paint Utihty 2. 2095 Brataccas... 495 
Aegis raw... 52.221 13495 Halley's Project 12995 
Aegis Animator/images 55 Kid Tak 3395 
The Pawn 


Es 
3495 
2995 
3495 
29.95 
32.95 
3495 
69.95 
6995 
69.95 
120.95 


COMMODORE 128 SOFTWARE 


Basle Compa . 
Chart-Pak 128 , peuno 
Cad-Pak 128 
Super C Compiler 
Super Pascal... 
Vizistar 128, > 

Partner 128 +: 


+ 6995 
14995 
49% 
49% 
54.95 
3495 
49.95 
27.95 


Home Pak... 

Superscript 126/Spelh¢ 22222. aS 
Perfect Writer. w.. ccc cs 5 4395 
Sylvia Porter-128 << 19% 
Paperback Writer 2%, 
Paperback Filer... 5 1295 
Paperback Planner’. « 1295 


Pa) 
18.95 


Firecsird 
Super Specials* FOR C-64/C-128 


* Special Prices Effective Now Thru October 31, 1986, 


Pawn .... 
Frankie Goes To 
Hollywood . 
Silver Series (ea) 


1541C Disk Drive 
1802C Monitor 
1581C 3.5 Disk Drive 
Call for Latest Prices 


XETEC SUPER- 
GRAPHIC 
INTERFACE 


69.95 


SPECIAL 
Speller Boo GOLDSTAR 
Dabo 13” COLOR 
Delta Paro Composite 
Monkey Business MONITOR | 
Winnie The Pooh. 434.95 tolivered 


Inlocom "-eeevocsss 
oe an MODEMS 
* Commodore 
mega | igipoade 
APM 1660 oe 49.95 
Anuante Westridge 6420... Cal 
Aten Commodore 1670 ;; 139 
Abs 
Gizmo ey 
Digital Link MISCELLANEOUS 64 
SOFTWARE 
Sublogic Football , 
Printmaster 
Comando 
feachithe Sirs 
Carriers At Ward 
Supebase 640 
Ship Poke 
Sargon kD 
tina 
Unima i 
Una W8 
Flet System 1 
Newsroom... 
Paper Alan Kio 
Compuserve Starter Kit 
Fight Smulatr kD 
Loderuners Re 
MindweetD 
The Works-D, 








2995 
24.95 
25.95 
5 

LHS 


.. 26.95 


- 21.95 
th) 








Borrowed Time... 
2on2 Basketball .. 
Murder/ Mississippi 
Hacker I 


BATTERIES 
INCLUDED 


CalKitD 
Consultant-O : 
Paper Clip/Spelipak 
Home Org, Series-0 
8180 Cord 


BRODERBUND 
Bank Street Writer-D 
Print Shop-0 
KaretekaD . 
Champ Loderunner-0 
Prt. Shop Graphics-D 
Print Shop Refil. 

Prt Shop Graph or 
Prt. Shop Companion . 
Bank St Filer... 
Bank St Speller 

Bank St, Malloy, 
Carmen San Diego 
Toy Shop 
ELECTRONIC ‘Ts, 
‘Archon-D 

Archon I-0 298 
Mule... 211.95 
Murder/Zinderneut-D .. 19.95 
Music Construction-D .-.11.95 
Pinball Constr.0 ......1195 
Skylox-D 2495 
One on One-0 222.1195 
Soven Cities of Gold. 11.95 
Mail Ord. Monsters-D . 11.5 
Racing Destruction D | ..11.95 
‘Adventure Constr -D 

Fin. Cookbook-D 

Bard's Tale... 

Europe Ablaze 

Touchdown Fo 

Lords of Conquest 
Chessmaster 2000 | 

Utimate Wizard 

Super Boulderdash 
Autoduel... 

Ogre... 

Heart of Africa . 


EPYX 

Fast Load Cart 

The Eidolon-D 
Winter Games. 0.2. 
Summer Games i-D 
Multan 64/128 
Vorpal Utility 

Movie Monster 
World Karate 
Super Cycle 
Champion Wrestling 
World Games 
Destroyer 


INFOCOM 
Deadline-D 
Enchanter-D . 
Infide-D 
Pianetfalt. 
Sorcerer-0 
Starcross-D 
Suspended0 
Witness: 
Sea Stalker-D 
Zork, Hor tO 
Wishbringer-D 
Spelbreaker.0 
Ballyhoo.... 
Leather Goddess 
Moonmist 
MICROPROSE 
Silent Service'D .. 
Gunship-D. 
AccrojetD 
Fot5 Strike Eagle. 
Decision in Dosert 
Kennedy Approact-0 
Crusade in Europe. 
Confit in Vietnam 


27% 
95, 
3495 

134.95 
Be 


23.95 
23.95 
27.95 

2395 
21.95 
27.95 


MasterCard 





MINDSCAPE 

Color Me: 2095 
Crossword Magic... 3495 
Perfect Score ...1.1. 114995 
Halley Project... 52095 
Quake Minus Gre... 72095 
Shadowtire 20.95 


EST. 1982 


Lords of Midnight 
Lusher Profile 

Infiltrator 

Bop 'N' Wrestle. i 
Spell/Destruction «... 
Pixel's Gamemaker 


Compute bility. 


P.O. Box 17882, Milwaukee, WI 53217 
ORDER LINES OPEN 
Mon-Fri 11 a.m. -7 p.m, CST © Sat. 12 p.m, -5 p.m, CST 


To Order Call Toll Free 


800-558-0003 


For Technical Info, Order 
Inquiries, or for Wisc. Orders 


414-351-2007 


ORDERING INFORMATION: Please specty system. For fast 
Gelivery send cashier's check or money order. Personal and 
company checks allow 14 business days to clear. School P.0's 
welcome. COLD charges are $300. In Continental US.A. include $3.00, 
for software orders, 4% shipping for hardware, minimum $4.00 
‘Master Card and Visa orders please include card W, expiration date 
and signature. Wi residents please include 5% sales tax. HI, AK, FPO, 
‘APO, Puerto Rico and Canadian orders, please add 5% shipping, 
minimum $500. All other foreign orders add 15% shipping. minimum 
$10.00. Allorders shipped outside the Continental U.S.A. are shipped 
first class insured U.S. mail I foreign shipping charges exceed the 
‘minimum amount, you will be charged the additional amount to get 
‘your package to you quickly and safely, All goods are new and 
include factory warranty, Due to our low prices all sales are inal, All 
elective returns must have a return authorization number. Please call 
(414) 351-2007 to obtain an R.A.# or your return willnot be accepted, 
Prices and availability subject to change without natic, 


No surcharge for MasterCard or Visa 


Kobayashi Alternative:0 27.95 
Brimstone. 275 
The Hobbit-D 2395 
Europe Ablaze-D.,.. 13395 
Animation Station’D 49:95 
Karate Champ-0. 25,95 
Kung Fu Master-D. 112595 
Spy vs. Spy Vol. Ih0, - 2395 
Internat Hockey-D 111995 
Fourth Protocol-0 
Blazing Paddles-D 
Super Huoy-0 
Spell tO, 
Math Blaster-D 
Hardball 
Dambusters 
PSI5 Trading Co. 
Law of the West , 
Glip Art, 
2495 Championship Boxing 
3795 Superman 
2195 Jet 
2495 Alternate Reality 
37.95 Sports Library! 
13295 Clip AILVol,2,..., 
2495 Fontmaster 2 
37.9 Invaders/Lost Tomb 
12795 Mind Pursuit 
2795 Never Ending Story 
9995 GAD sores eses ees 
27.95 Art Gallery|... 
:3995 Star Rank Boxing 
On Field Football 
Star League Baseball 
On-Court Tennis 
Freeze Frame 
The Pawn . 
Vizistar Xt8 
Hidden Assets 
Adv. Music System 
Spitire 40, 
AGE... 
Maxi Basic 
Fantastic Four 
Rescue Raiders 
Ught Lab 
Ace of Aces 
Fight Night, 
Hole in Oni 
Geos... 
Deceptor . 


SSI 

Wiaare’s Crown 
50 Mission Crust. 
Cosmic Balance-D 
Germany 1985-0 
Protessional Golt 
Broadsides-D . 
Question 

Computer Qirbacico 
Field of FreD. 
Carrier Force-D. 
Breakthru Ardennes: 
Computer Ambush-D 
Kamp{gruppe-D 
Oper. Mkt. Garden.0 
Gemstone Warrior-D 
Imperium Galact-D, 
Phantasie-D .. 
Battalion Comm-0. 
Fighter Command-0 
Norway 19850, 
Wings of War-D 
Mech Brigado-D 
Battle/Antietnam 
Panzer Grenider , 
USAAF 

Phantasie i 
Rings of Zitin. 
Battle Group... 2... 
NAM sseseoecoee 
Gettysburg. 
TIMEWORKS 
Business Systems-0 
Word Writer/Spell-d 
Switteale w/ Sideways. 
Data Manager 1-0 
Sideways-D .... 
Evelyn Wood-D 
Sylvia Porter-D 
Sylvia Porter i. 


2795 
2495 
12495 
37.95 
2495 
495 
2495 
2455 
2495 
97.95 
3795 
37.95 
3795 
3295 
21.95 
24.95 
2495 


24.95 


399% 
3495 
M95 
3495 
20.95 
3495 
3995 
3995 








. , 


ne] GET THE = fxd 
PICTURE? 


Photo Cintsh 


— now available, 














With our NEW product, you can get an i SS as 
Ty 33 iment BIE 2 = 
OPTIMIZED PRINT DUMP IMAGINE TAKING YOUR USUAL 
8% inch by 6% inch output 
- AND ENLARGING IT TO 
Take pictures or graphics from the m- STEED BY SEED MI 
most popular graphic utilities* for the Features 
Commodore 64/128 computers and CON ee Oe EE 


pictures fo your printer QUICKLY and EASILY 


print them quickly and easily for a truly IVPESETIER - verioy specialy designed TEXT fonts 


‘ond ICONS On your picture » A TRUE SIGN MAKER 


SMO-O-OTH LOOK! INCREDELE RESOLION EC ens SON 


CONTROL BOARD _ bring your own pictures into 
your own programs easly 


- View and adjust gray scale patterns 
CONVERT picture file formats to other product 
ON YOUR SCREEN to shade your tae ae eee. cate 
image for a perfect “photo finish”. SOOM nose goed nos win ne amaze 
- Horizontal or vertical output with FAP pictures for iron-on applications 
optional “optimized” print. + STRP cole trom you pcte 
. REVERSE picture ton sty ~ CROP ond FRAME 
- Supports Commodore, Okidata, Epson estietemh teh 
and compatible printers as well as a AND MANY MORE GREAT FEATURES 
user defined printer option. PROFESSIONAL FRESULTS - EASY and FUN to USE 


PO Box 177 
0 N 40527-0177 
ALL AVAILABLE FROM: solutions\guniimited bobo Fea Neon 
(914) 693.3496 
3% asamanion SIATION ¢ Suncom, COMPA AIOAAW € ohms. PRINT Jmara, BLAZING PADOLES € Baadvile, DOODLE € Crs, KOALA € Koala Tectvoioges Corp, SUPERSKETCH € 
‘ereonal Ponpharis, COMMODONE Gee wes NEWSROOM € Spr MAASTERC Umnon Workl ICON FACTORY YOO0 Soktions United BILLBOARD MAKEN fokiuons Urinted 
1 (GLLGOAMO MAKER wre aol ne sore nc RWTSROOM or PIT MASTER a er wt Seow Map” econ of PRINT SHOPY 





AMIGA HARDWARE 


CALL FOR PRICES!! 


256 K. COLOR AMIGA SYSTEM 
256 K. AMIGA CPU 
A1010 3%" DISK DRIVE 
A1080 COLOR MONITOR 
A1050 256 K, EXPANSION 


INDIVIDUAL ITEMS OR PACKAGES 


TOP HITS 


AMIGA SOFT ARE 
Aegis Draw... . 
Aegis Animatovimages « 
Analyze ....... 
Amiga Ass 
Amiga Pascal . .. 
Arctic Fox ...... 
Ballyhoo ....... 
Brataccas 
Bulletin Board System 
Caleraft .... 6... 
Deja Vu. 
Deluxe Paint . ... 
Art & Utility Disk #1... 
Deluxe Print ......... 
Art Disk #2 
Deluxe Video . 
Driving Game ....... 
Financial Cookbook . . 
French & Spanish 
Grammar C 
Halley Project .. 
Graph Craft . 
Instant Music 
Lattice "C"... 3 
Little Computer People 
Marauder (Copy). 
Marble Madness 
Mind Shadow 
Mind Walker . . 
Music Studio . 
One On One ...... 
On Line 
Practical Composition 
Practical Vocabulary 
Racter 
Robot War 
Rogue 
Scribble. 
Seven Cities of Gold 
Skyfox 
Temple of Apshai Trilogy 
Text Craft .... 
Typing Tutor! 
Word Invaders 
Winter Games. 
World Geography 
Adventure 


C-64/128 SOFTWARE 
All ABACUS Titles 
All MASTERTRONIC Titles 
Bard's Tale .... 
Battle Group . 
Bop ‘N Wrestle........ 
Computer Quarterback 
Conflict in Vietnam 
Copy 11 64/128 . 
Crusade in Europe 
CSM 1541 Disk Aljanment 
Elite . 
Fast Load (R) 
Fast Hack’em .. . 
F-15 Strike Eagle... 
Flight Simulator I. . 
Scenery Disk 
Fontmaster II. 
GEOS ... 
Gamemaker 
Gunship 
Hardball 
Hitchhiker's Guide 
to the Galaxy. . 
Jet Z 
Little Computer People 
Karateka 
Kampfgruppe 
Merlin 64/128 
Moviemaker 
Music Studio 
Newsroom 
Clip Art | & Il 
Leaderboard Golf 
Tournament Disk 
Phantasie | & Il 
Print Shop 
Graphic Library 
ie Ill 
Print Master 
Art Gallery | & Ii 
Print Shop Companion 
Snapshot 
Silent Service 
Rings of Zilfin 
Winter Games 
World Karate 
Championship 


CALL 
/CALL 
$28 
$35 
$21 
$24 
$27 
$39 
$27 
$39 
$25 
$26 
$29 
. $25 
. $39 
$16 
$32 
$49 
$25 
$25 


EARL} Y BIRD 


CHRISTMAS SPECIALS 


SUNCOM 


P.Q. PARTY QUIZ 
ONLY 


$4495 


COMMODORE (8-BIT) 


COMMODORE HARDWARE 
D 64 C Computer . -. $179 
D 1541 C Disk Drive ....$199 
C-128 Computer . CALL 
VIC-1571 Disk Drive ....CALL 
VIC-1581 Disk Drive ....CALL 
512K Ram Expansion . .. .$179 


PRINTERS 
OTHERS AVAILABLE ~ PLEASE CALL 
Star - NX-10 .. 
Epson - FX-85. 
Panasonic - 1091 


RIBBONS 
Commodore 1525 .... 
Commodore 1526/802 . 
Commodore MPS-801 
Commodore MPS-803 
Epson MX/RX/FX-80 . .. 
Okimate 10 - Color ... 
Star Powertype 
Star Gemini 10 - Black . 
Star Gemini 10 - Color 


BULK DISKS 
100 Quality DSDD 
100 Quality SSDD 
Less Than 100 
— DSDD 
Less Than 100 
— SSDD ea. 
Gold Star DSDD 3% "ea. $1.79 
Sony DSDD 3%” .. .ea. $2.05 


ea. 
-€a. 


ea. 


CALL ON THESE AND OTHER 
PRODUCTS. WE CARRY A 
COMPLETE LINE OF 
SOFTWARE AND HARDWARE 


DATASOFT 
COMMODORE 64/128 
O'Riley Mine (D/C) .... .$5.95 
Dallas Quest (D) $5.95 
Mancopter (D) . . $5.95 
TIMEWORKS 
COMMODORE 64/128 
Money Manager (D/C). . 
Electronic Check 
book (D/C) .. $5.95 
Data Manager (D/C) ....$5.95 
MINDSCAPE 
€-64/128 - EDUCATIONAL 
Age 4 to 8 
Tink's Adventure . . 
Tuk Goes to Town . 
Tinka’s Mazes ... 
Tonk in the Land of 
The Buddy Bots 
Age 8 to 12 
Mr. Pixel's Paint Set ... 
Mr. Pixel’s Cartoon Kit 
Show Director . 
Bank Street Storybook 


TEDDY RUXPIN . 

GRUBBY .... 

The Adventure Series 

FOB Plush Hand Puppet 

Teddy Ruxpin Clothing 
Starting at 


$5.95 


$6.95 
$6.95 
. $6.95 


$9.95 


«$65 
$49 
ea, $12 
ea, $12 


DUST COVERS 
Amiga System Pack 
Amiga 1010 Disk Drive . 
C-128 Computer . . 
1541 Disk Drive .. 
1571 Disk Drive 
1702 Monitor . . 
VIC 20/64 Computer 


ALL TITLES ON DISK UNLESS MARKED (R) FOR ROM CARTRIDGE 
WE CHECK FOR STOLEN VISA & MASTERCARD Customer Service 


Order Line 
1-800-282-0333 


ORDERS ONL’ 
Not Have Information on 


Previous Orders or Product Specs. 


[arm 


ales Personnel Do 


M-F 10 a.m.-8 p.m.; Sat. 10-3 ET 
37 S. Broad Street, Fairborn, OH 45324 


& Ohio Residents 
1-513-879-9699 


19 via UPS in continental U.S. Please add $2 orders under $50. HARDWARE and all 


‘or money order. All items subject to 
Srimenny.ordee: Al tere sabiect vo saniene 


ard orders add 





THE ULTIMATE CONTROL INTERFACE 


Compatible with C64, 
C128 in 64 & 128 modes, 
and C128 in CP/M mode 





Universally applicable dual 6522 Versatile Interface Adapter (VIA) 
board, Intelligently control almost any device, Perform automated 
testing. Acquire data for laboratory and instrumentation 
applications. Provides four 8-bit fully bidirectional /O ports & eight 
handshake lines. Four 16-bit timer/counters. Full IRQ interrupt 
capability. Expandable. Includes extensive documentation and 
programs on disk. $169 postpaid USA. Each additional board $149. 


SYMBOL MASTER MULTI-PASS 
SYMBOLIC DISASSEMBLER 


better with Version 2.0! 
nbles any 6502/65 10/undoc/65C02/8502 machine code 
program into beautiful source. Includes both C64 & C128 native 
mode versions, Learn to program like the experts! Adapt existing 
programs to your needs! Outputs source code files to disk fully 
compatible with your MAE, PAL, CBM, Develop-64, LADS, Merlin or 
Panther assembler, ready for reassembly and editing. 100% 
machine code and extremely fast, 63-page manual. Advanced and 
sophisticated features far too numerous to detail here, $49.95 
postpaid USA. 


PROFESSIONAL UTILITIES & RESOURCES 


* C64 Source Code. M vailable reconstructed, 

comm referenced assembly language 
source code for Basic and Kernal ROMs, all 16K. In book form, 242 
pages. $29.95 postpaid USA 

+ PTD-6510 Symbolic Debugger for C64. An extremely powerful tool 
with capabilities far beyond a machine-language monitor. 100-page 
manual, $49.95 postpaid USA 

* MAE64 version 5.0. Fully professional 6502/65C02 macro 
editorlassembler, 80-page manual. $29.95 postpaid USA. 


SCHNEDLER SYSTEMS 
1501 N. Ivanhoe, Dept. cid, Arlington, VA 22205 
Information/Telephone Orders (703) 237-4796. VISA/ MasterCard 





| and best is now ev 
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Commodore Compatible 


and only. . . $439.00 


FSD-1 5%”Disk Drive 
Directly replaces the Commodore 1541 disk drive. 


The FSD-1 Disk Drive is a versatile and efficient disk drive built for the Com- 
modore series of personal computers. This disk drive is fully compatible 
with the Commodore 64 computer and directly replaces the Commodore 
1541 Disk Drive, giving much better performance in terms of data loading 
and writing speed and memory butler size, 


To Order call toll free 
1-800-356-5178 
Visa and MasterCard are welcome. Allow 


$800 shipping and handling, Or mail your 
order with check or money order to 


Special Features 


Full 6 month warranty—your 
anco of quail 
Slim line construction—to fit in those 
smaller place: 
1d motal chi 
efficient alway; 
Ft with chairung option fo 
y 
dustry standard form 


40 run cool and 


Emerald Component International 
541 Willamette Street 

Eugene, OR 97401 

Tel. 503-683-1154 


cially tor C-64 us 


Remember, no ax in Oregon. 








You Have a Choice. 


Numeric Keypads 

































































GP Numeric Keypad 
* Top quality, low profile key switches for smooth, reliable data entry 
© Fasily connected with c iter keyboard. 
© No software is required. 1006 Compatible with all programs. 
© Available for Commodore 64, SX-64*. VIC-20 and Apple He Computers. 
. ear warranty and available in three models: 
Regular 7 Pius be 
$49.95 L $5.95 $69, 
Power Supply 
© Has better features than the original one at $39.95. 
# Is serviceable, NOT disposable 
# Works dependably with one year warranty 
# For Commodore and Atari* Computers 


Computer Place 
23914 Crenshaw Blvd. 


(213) 325-4754 
Torrance, CA 90505 






Atari is the tr 
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IBEBOR 


THE 
MIRROR 
WIIBBOR 


| D) f—) (St OL) 2d I SI 4 
$24.95 


INO FINER OR MORE ADVANCED ARCHIVAL COPIER AVAILABLE AT 
ANY PRICE, 
EASY TO USE, DOES NOT CAUSE DRIVE HEAD TO KNOCK. 
COPIES UP TO 41 TRACKS. 
PERIODIC UPDATE POLICY. 
AUTOMATICALLY MAKES BACK-UP COPIES FROM VIRTUALLY ALL 
PROTECTED SOFTWARE 
NIBBLES, HALF TRACKS, COPIES EXTRA SECTORS AND EXTRA TRACKS. 
REPRODUCES ALL DISK ERRORS AUTOMATICALLY. 
FAST, COPIES FULL DISK IN AS LITTLE AS 4-7 MINS. EVEN COPIES 
ITSELF. 
\WE COPY MORE! 
MASTERCARD, VISA, M.O. OR CHECK OK 
+ $3 SHIPPING & HANDLING 
OD. OR FOREIGN ORDERS ADD $2 
CALIF. ORDERS ADD 6% SALES TAX 
— WRITE OR CALL — 


Compumed 


(408) 758-2436 
P.O. BOX 6939 
SALINAS, CA 93912 
FOR COMMODORE 64 AND 1541 DRIVE 
OR COMMODORE 128 AND 1571 DRIVE 








ABACUS 


‘Ada Training Course: $29.95 
Assembler Monitor. . 29.95 
Basic 128 oe 42,05 
Basic 64... TL) 29/95 
Cadpak 128 45.95 
Cadpak 64 23.95 
Gadpak 64 w/Light Pen 69.95 
Chartpak 128 29.95, 
Chartpak 64 29.95 
Cobol 29.95 
Datamat 29.95 
Personal Portfolio Manager... 29.95 
Powerplan 29.95 
Super C Compiler 64/128... 42.95 
Super Pascal 45.95 
Techinical Analysis System... 45.95 
Video Basic 29.95 
Xper 45.95, 
BRODERBUND 
Karateka $19.95 
Music Shop. 27.95 
P/S Library 1-2-3 15.95, 
Print Shop 26.95 
Print Shop Companion 21.95 
MICRO LEAGUE 
General Managers Disk $24.95 
Micro League Baseball 24.95, 
Team Disks 16.95 
RIBBON 
Axiom Elite § LO $5.95 
Brother 15, 25, 35 5.95 
Commodore 1525 6.95 
Commodore 1526 6.75 
Epson 185 6.95 
Epson 85 4.95 
Epson mx, 1x, rx 100. 6.95 
Epson mx, fx, x, 1x 80 4.75 
Gorilla Banana 6.95 
Juki 6000 4.95 
Juki 6100 3:95 
Legend 880, 1080, 808 6.75 
MPS 801 5.75 
MPS 803 6.95 
OKI 182, 192 9.75 
OKi 82, 92, 83, 93 2.25 
SG 10-15 2.25 
(Min. 6 per order) 
INFOCOM 
Ballyhoo $24.95 
Enchanter 21.95 
Hitehhicker's Guide 21195 
Invisiclues (all) 6.00 
Sorcerer 24,95 
Spelreakar 26.95 
ishbringer 22.95 
Witness.” 22.95 
Zork 1-2-3 25.95 
Trinity 128 24.95 
PRECISION 




















NEW RELEASES 
Worlds Karate Champ... $18.95 
Sublogic Football 27.95 
Wizards Crown 24.95, 
20n 2 Basketball 21.95, 
Micor League Box Score 

Stat Compiler 15.95 
Star Fleet 1 29.95, 
Spittire 40 22.95 
Font Master Il 31.95, 
Commando 20.95 
Jin 1 Brian Bloodaxe/ 

Revelations/Quovadis.. 16.95 
Mind Pursuit 18.95 
Mind Mirror 21.95 
Spell of Destruction 18.95 
Trinity 128 24.95 
Geos 37.95 


DIGITAL SOLUTIONS 
Paperback Filer 128 $31.95 











Paperback Filer 64 24.95 
Paperback Planner 128 31,95 
Paperback Planner 64 24.95 
Paperback Writer 128 31.95 
Paperback Writer 64 24.95 
MICROPROSE 
Conflict in Vietnam, $24.95 
Crusade in Europe 24.95 
F-15 Strike Eagle 21.95 


Silent Service 21.95 


SPRINGBOARD 


Clip Art | $20.95 
Clip Ant tt 24.95 
Newsroom 30.95 


AICP 
Disk Drive Cleaner 


Disks (10) 
Printer Head Cleaner 





ACCESS 
Leader Board $24.95 
Leader Board Tournament Disk... 14,95 


Mach 128 30.95 
Mach 5 20.95 
ELA 
Bard's Tale $24.95 
Carrier at War 25,95 
Europe Ablaze 29.95 
Heart of Africa 24,95 
Lords of Conquest 24.95 
Movie Maker 24.95 
TIMEWORKS 
Data Manager 128 $42.95 
Data Manager II 29.95, 
Electronic Checkbook 16.95 
Money Manager 16.95 
Sideways 18.95 


Switt Cale 128 w/Sideways.. 42.95 









Superbase 128 
Superbase 64 

Superscript 128 
Superscript 64 


Order. 


Customer Service 
718-351-1864 
10AM to 6PM 





E.S.T. 


$56.95 


Switt Calc 64 w/Sideways... 29.95 
46.95 Word Writer 128 w/Speller... 42.95 
47.95 Word Writer 64 w/Speller.. 29.95 


46.95 


CALL US 


_ AMERICAN INTERNATIONAL 
COMPUTER PAOGDUCTS 


P.O. Box 1758 
Staten Island, N.Y. 10314 


ACTIVISION 
Alter Ego 
Cross Country Road Race 
Gamemaker 
Hacker 
Little Computer People 
Mindshadow 


$29.95 
19.95 
24.95 
21.95 
21.95 
19.95 


eanneena: enenen-=--5 


ACCESSORIES 


WICO Boss Joystick 


WICO Bat Handle Joystick 
WICO Three Way Joystick. 


Joystick 
Data Case (50) 
Flexidraw 

Xetek Graphic Interface 





iT 
' 
' 
H 
t 
+ Disk Notcher 
H 
H 
i 
Hl 
H 













BATTERIES INCLUDED 


Consultant 64/128 
Paper Clip 64/128 
Paper Clip w/spell 64/128 


ACCOLADE 
Oambusters 
Fight Night 
Hard Bal 
Law of The West 
PSI 5 Trading Comp 





SUBLOGIC 
Flight Simulator 11 
Football 
Jet 


Scenery Disks 1-6 


KOALA 
Koala Pads 64 
Koala Printer Utility 
Programers Too! Kit 


MINDSCAPE 
Bop and Wrestle 
Intitator 

Halley. Project 


EPYX 
Fast Load 
Multiplan 64/128 
Programmers Too! Kit 


Fid Karate Championship 
Worlds Greatest Baseball 


kak kkk 





$39.95 
39,95 
49.95 


$18.95 
18.95 
18.95 
18.95 
18.95 


$34.95 
27.95 
27.95 
14.95 ea 


$42.95 
16.95 
24,95 


$18.95 
18.95 
24.95 


23.95 
40.95 
27.95 
21.95 
18.95 
23.95 


xk 


SPECIAL SAVINGS 


FREE 


PRINTER HEAD 
CLEANER KIT 
with every 
RIBBON ORDER 


Keak 


x 


HOT SELLERS 


AICP Disks (10) $ 7.95 
Printshop Companion 21,95 
CadPak 64 29.95, 
Mach 128 30.95 
Koala Pads. 42.95 
Bard's Tale 24,95 
Leader Board 24.95 
News Room 30.95 
CagPak 128 45.95 
Ultima IV 39.95 
COMMODORE HARDWARE 
C128 $225.00 
C1571 225.00 
C-1920 275.00 
C-1670 Modem 1200 155.00 
C-1350 Mouse 49.95 
FIREBIRD 
Elte $18.95 
Colossus Chess IV. 21,95 
Frankie Goes To Hollywood: 21,95 
Music Systems 24.95 
Advance Music Systems... 49.95 


2 Games In One 
Gerry The Germ/ 


Microcosm $13.95 
Willow Pattern 

Chimera 13,95 
UnderWuride 

Sabre Wult 13.95 
Booty/Cylu 13,95 
Runestone/The Helm 13,95 
Chicken Chase/Rasputin 13,95 
Battle of Britian 

Battle for Midway 13,95 
‘ARC of Yesod 

Nodes of Yesod 13,95 


AMIGA SOFTWARE 


Borrowed Time $27.95 
Hacker 27.95 
Mindshadow 27.95 
Music Studio 37.95 
Aegis Animator w/Images...._ 89.95 
Aegis Oraw 124.95 
Archon 29.95, 
Deluxe Paint 72.95, 
Skytox 29.95 
Rogue 24.95 
Temple of Apshal Trilogy 24.95 
Master Type 24.95 
Halley Project 29.95 
Racter 32.95 


FREE CATALOG 


with every purchase 








TOLL FREE 


1-800-634-AICP ony 


In stock tems shipped within 24 hours for prepaid orders (cer. check 
visa. m/e.) C.0.D orders accepted, please add $4 00, must be cash or cer 





sales tax. Advertised orices 
200.4% All orders 268 $3.50, 

ial US. International orers add 

checks allow 2 wks. for clearance 
Change without notice Orders. over 


ping in Conte 
checks. payabe To. American. Ine 
REQUIRE RETURN. AUTHORIZATION 


Computer Products 


ELBE: The Echo Lake BASIC Enhancement 





COMMODORE 128” 


© Format memory into 
up to 3800 records 

© Type data directly into 
record formatted memory 

* Access your data directly 
through BASIC 

* Process your data through 
ELBE’S statistical routines 


* Sorts 

© Descriptive statistics 

* Analyses of variance 

* Analyses of covariance 
* Correlations 

* Multiple regressions 

* Crosstabulations 


send check or money order to: 


Echo Lake Laboratories * Box 169 * Pascoag, RI 02859-0169 


* Ri. residents add 6% sales tax 
Commodore 64 and Commodore 128 are trademarks of 
Commodore Electronics, Ltd. 





One disk, 25 business programs, $19.95 


The Intelligent Saftware Packages the one product for your Com- 
modiore that can take care ofall your data processing needs, 


bebicel Lethal alice ll ‘and no clubs to 
join. The package is not public domain software, and is sold only direct 
to customers by mail; it: all available printers, and will run on 
Commodore Bompuer. {except Amiga) with a minimum of 10k RAM, 
including the C-128 in C-1268 mode. 

What you get when you order the Package: 


fevern—cornp.tos broskeven enatysis, 
Depreciation—croates depreciation 


1, schedules, 
Labeler—creates lobels. 
File Copler—copien sequen, program 
8. 


Correlation—colcuiates statistical cor- 
‘Also other Database and Word Processor 
utiities, 











Program output 
this ad out and keep it handy! 








= Box A Dept. G-9 
Intelligent Software son anseimo, ca 94960 
Quality Software since 1982 (415) 457-6153 
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¥ Proudly Presents 


peapLock’s DELUXE BBS 
CONSTRUCTION KIT 


Tired of running someone else's idea of what your BBS should look 

like? We at Deadlock Software have the answer, the DLBBS 

Construction Kit! With this system you, the Sysop, are In control. 

Some functions include: 

* Unlimited Sysop defined PROGRAMMABLE MENUS, multiple actions may be defined 
to.a menu choice 

+ Supports ony drive configuration 

* Quick Key, user does not have fo wait for entire menu to appear 

© User sees only what he has access to 

+» 30/1200 Boud with most popuir modems 

* Uploads and Downloads; XMODEM/PUNTER 

* Special Interest Groups, Commented Downloads, Directory Downloads 

© Tronscript of user sent fo printer or disk 

* Easly archived, low syste maintenance, USER FRIENDLY * Full support by authors 
Plus all the features you would Allthisand 
expect in a GREAT BBS System more for only 85 


This is Q TOP QUALITY system, NOT to be confused with similar systems. 


Call us today, Deadlock BBS Demo System (609) 653-4330 
300/1200 Baud, 24 hours a day 
Orders may be sent to: 
DEADLOCK SOFTWARE 205 Boston Avenue 
Mays Landing, New Jersey 08330 
Or coll 4-800-334-0854, Ext. 827 (orders only) 
MISA, MasterCard, COD's, Money Orders accepted (tree shipping within the United 
States), Add $3.00 for COD orders, No personal checks accepted. 


NJ residents add 6% sales tox 
‘ond Commodore. 





For the 
Commodore 64/128 





we 
oo ALICE You 
AE 
TIME 1S UP 
unk s1AL 
Gt 
fLIGE 
FATTY 
DAVE Rock Chal lenge 


Greatest party game ever! Hundreds of songs 
in one of the most challenging and fun games out 
for the Commodore. No two games ever alike ! 
Up to S players at a time. 

‘With Rock Challenge Group Editor you can add 
your favorite group's titles and save them to your 
own data disk. Later when the group comes out 
with more songs just add them to your data disk, 

Example: You choose to play the Beatles with 
35 songs to play. The program chooses one of the 
over 100 songs and places as a series of dashes. 
Player 1 guesses a letter in the song, if there he 
wins a point and continues his turn till he gui 
wrong or solves the song for a S point bonus. 

FAST MACHINE CODE PROGRAM 
Only $14.95 + $150 Posta 
Send check or money order to: 
SoftPace Software Co 
P.O. BOX 788 
Brea, CA. 92622-0788 


Soft Pace 











Software Discounters 
of America Open Saturday 


¢ Free shipping on orders over 
For Orders Only—1-800-225-7638 Ke MeAtahUSA 


PA Orders— 1-800-223-7784 * Nc surcharge for VISA/MasterC 


Customer Service 412-361-5291 * Your card 1s not charged until we 


‘ABACUS Spittire 40 (0) $23 DIGITAL SOLUTIONS Ware wiall Supply Ultima 40) ...$39 Trio 64(D) + $43 
Basic 128 Title Bout (0) $19 Pocket Filer 128 Kit $12. PENGUINPOLARWARE — SUBLOGIG. 
Cad Pak 128 Tournament Goll (0).$19 Pocket Planner 128 INFOCOM Crimson Crown (0) ...$12 Baseball (D) $32 
Chart pak 128 CALL BATTERIES INCLUDED —_ Pocket Writer 64 Ballyhoo (D) $25 Graphics Magician Flight Simulator 2(D) $32 
Gobo! 64 FOR Consultant (64 0r128)$39 Pocket Writer 128 Gut Throats(0) .-.$23 Painter (D) 316 F.S.Scenery Disks, .Call 
Power Plan64 PRICES — Home Pak (D) $33 ELECTRONIC ARTS Enchanter (0) $23 Oo-Topos (0) $12 Football(0) $29 
Super C 128 Paperclip w/Speli ‘Adv. Const. Set (0) Hitchhiker's Guide to. Transyivania(O) $12 Jet (0) $29 
‘ACCESS: 64 0 128 $49 Amnesia (0) theGalaxy(O) ....$23 PROFESSIONAL TELARIUM 
BeachHead2(0) $24 Paperclipil128...$49 Archon 2: Adept (0) Infidel (0) 325 SOFTWARE Amazon (D) 
Leader Board Goll (0)$25 BERKELEY Bard's Tale (0) Leather Goddesses of Fleet System 2—W.P. Fahrenheit 451(0) .. $9 
Leader Board ‘SOFTWORKS Europe Ablaze (0) Phobos (0) Call wi70,000 word spell Dragon World (0)... $9 
Tourn, Disk #1,...$14 Geos (D) $39 Heart of Africa (D) Planettall (0) $23 _checker6400r 128 $39 Nine Princes in 
Mach 5(R) $23 BRODERBUND Lords of Conquest (D) Sorcerer (0) $25 Fleet System3(128) $49 Amber (D) 321 
Mach 128 (RA) $33 Bank St. Filer(D)....$33 Mail Order Monsters (0) Suspect (0) $25 SCARBOROUGH TIMEWORKS 
Tenth Framo() ....$25 Bank St.Mailer(D) $33 Movie Maker (O) Trinity 128 $25 Boston Computer Acets, Payable (0) ..$39 
ACTIVISION Bank SU Writer(0) ..$33 Music Const. Set (0) Wishbringer(O).... $23 Diet(O) $39 Accts. Recelvable (0) $39 
Alter Ego (Male Bank St. Spetier (0), $33 One-on-One (0) Zork 1(0) $23 Build A Book (0) $16 Data Manager 2(0), $33 
or Female) 333 Broakers (0) $25 Pinball Const.Set(0) Zork 201 3(0) $25 Mastertype (0) $25 Data Manager 128, $43 
Borrowed Time(D) $19 Carmen Sandiego(0)$23 Racing Dest. Set (O) INTRACORP. Net Worth (0) $39 Evelyn Wood 
Garry Kitchen's Music Shop (0) .....$29 Seven Cities of Gold (0) intracourse (Compatituity) SIMON & SCHUSTER ‘Dynamic Reader (0)$33 
Gamemaker(0)...$25 Print Shop (0) $26 Skytox (D) & Analysis Modules)s65 Chem Lab (0) $25 General Ledger(D) ..$39 
Great American P.S. Companion (0). $23 Super Boulder Dash (OD) intracourse (Compatibility Great International ventory: Marat (0) 338. 
Cross-Country P'S. Graphics Library Timothy Leary's Module) 333 Paper Airplane Partner 128(R).-.. $43 
Road Race(0)....$19 #1, #2083. $16Ea, Mind Mirror (O) Intracourse (Analysis, Construction Sey) $19 Payroll Mgmt.(D) $38 
Hacker (0) $19 Type! (0) $25 Ultimate Wizard (0) Module) $99 Star Trek-The Kobayashi Sales Analysis 
Hacker 2(D) $23 CARDCO Prices too low to MASTERTRONIC Alternative (D)....$25 ‘Mgmt (0) $39 
Little Computer Gale Now (0) $14 advert Call Action Biker(O)......s7 Typing Tutor3(O) ...$25  SwiltcalerSidoways(0) $33 
Pople (0) $23. File Now (0) 314 EPYX Electra Glide (0)... $7 SPINNAKER Swittcale! 
Mindshadow (0) ...1$19 Freeze Framo(A). 333 Barbie(0) 39 Gatosol DawniO).. 37 ACE: Alr Combat Sideways (128) .. $43 
Music Studio(D) -..$23.  GraphNow(D)... $14 Breakdance (0) 39 infinity Machine (Ry 319. Emulator(O) .....$14 Sylvia Porter's Personal 
Murder on the Hidden Assets (R)...$49 Champ, Wrestling (0). Call Kikstart (0) 37, Adventure Creator(h).39 Fin, Blanner 64 (0), $39 
Mississippi (D) ...$23 Mail Now (0) $14 Destroyer (0) Call 5.ASideSoccer(0)...$7 Alphabet Zoo(R).....$9 Sylvia Porter's 
Space Shuttie(0) $19 S'more(R) $44 Fast Load(R) $23 Last V.8(0) $7 AllinColorCave(y..$9 Personal Financial 
‘ACCOLADE Super G Pr. int Impossible Mission(0).$9 Master of Magic(O) _.$7 Delta Drawing(A) .. $9 Planner 128 
Ace ot Aces(D).....$19 w/16K Bulfer.....$49 Movie Monster(0)...$23 Ninja (0) 37 Facemaker(R) sa) Word Welter w) 
Dambusters(0).....$19 Write Now (R) $19 Multiplan 128 $39 Sokaa ol Assiah(0) $7 FfactionFeveriA) $9 Speier (D) 
Deceptor (0) $19 cas Pitstop i (0) $9 The Slugger (0) $7 Homework Helper Math Word Writer 8000 
Fight Night(O)......$19 Argos Expedition (0) $9 Summer Games 2(0) $23. Vegas Jackpot (0)....$7 _,,,"¥0t9 Problems (0) $23 Word Spoiler (128) .$43 
ard Ball (0) $19 Big Bird's Funnouse(R).$9 SuperCycle(D) $23 MIGROLEAGUE Lorna oric ene UNISONIWORLD 
Law of the West (0). $19 Big Bird Spc. Del. (A) $9 Templo of Apsnai Baseball (0) $25, Writing (0) 323. AntGallery 1(0),.. $16 
PS1'5 TradingCo.(0),$19 Body inFocus(0)...$23 Trilogy (D) $23 Box Score Stats (0). $16 '"¥aders of the Lost AN Gallery 2(0)... $16 
‘AMERICAN Dream House(0), $9 WinterGames(D) $23 General Manager(D) $28 y,{°™®(0) $19 PrintMaster(0) $23 
EDUCATIONAL Ernie's Big Splash (0),$9 — World Championship 1985 Team Date Disk $14 id8.0n Keys (A) $9 WEEKLY READER 
Biology (0) $14 Erie's Magic Karate (0) 319 MICROPROSE Kung Fu 1— Stickyboar ABC'S (0) $19 
French (0) 314 Shapes (R) 39 World Games (0), $23 F.15Strike Eagle(O).$23 4 SxPIOdNOFisi(O) 819 Stickyboar Math (O) $19 
Grammar (0) $14 Grover's Animal World's Greatest Gunshipio) faa Kung fu2— 5 Suchybeay Numbersiois18 
Science: Grades W4(0) $14 Adventures (D) _...$9 _ Basebalhimproved $23. Xennedy ApproactyO) rented Tia palestine] 
Sconce: GradesSeO) $14 MastenngineSat(O) saa Worl's Gresest Silent Servce(o).-” 823, SPRINGBOARD Siickybea Shapes (0). $19 
Science: Grades 7/0) $14 Math Mileage(D).....$9 _ Football (D) 323 MINDSCAPE Certificate Maker(O) $33 WINDHAM CLASSICS 
Spanish (0) $14 Movie Musical FIREBIRO Bank St Music Newsroom (0) 333 Alice in Wonderland (0) $9 
US.Geography (0) $14 Madness (0) $9 Colossus Chess 4(0)$23 Writer (0) sig NRChDArVo! 1(0)819 Below the Root(O) $8 
World Geography (0) $14 Railroad Works (0) $9 Elite(O) $19 Bank St Storybook (0) $19. NR. CIPArL Vol 2(0)825 Swiss Family 
World History(O} ...$14 Rich Scarry's Electionic Frankie Goes to BopasWrestie() sig PS. Graphics Robinson (0) 39 
ARTWORK Word Book(0)....$12 Hollywood (0) ....$23. olor Me: The Computer gai tPAN#NID) .....$25  WrrasurelsiandiO) . $8 
Beach Blanket Sesame St. Pals The Pawn (0) $25 “Coloring kit(0)... $19 $8! ens St ORT) 8 
Volleyball(D).....$12 Around Town(0)...9 FISHER PRICE Farin} $18 BattieGroup(O) $37 ACCESSORIES 
Bridge 4.0 (0) $16 Success wiAlgebra Call Alpha Build (R) $9 Great British Battle of Antiotany0)s33' Bonus 88,00/,, 85,69 Bx 
Cycle Nigh(O)..... $12 Success wMath ., Call Dance Fantasy(R) . $9 —‘Sottware(D)......s12 Colonial Conquest (0) $25 Bonus DS. OD. $6.99 Bx 
Equestrian Show Timebound (0) 39 Hop Along Halley Project(O) ,..319  FieareietOn cease Suerte 
‘Jumper (0) $12. Weather Tamers(G) 89 Counting (R) $9 Iniltrator(oy Sia Fieldot Fire(O) $25 Kit 519 
Strip Poker(0) $21 CMS. Linking Logic(R).....$8 ponectscoeSATibiges Gemstone Warrior (O}823 Disk Case (Holds 50) .$8 
Data Disk #1 female $16 General Memory Manor(R) $9 Soe stpesvusronorsie Gettysburg (0). .$37 Disk DriveCleaner .. $9 
Data Disk#2male...$16 Accounting 128..$119 NumberTumbler(R) $9 The American Challenge Kamploruppe(D)....$37_—Kralt Joystick 39 
Data Disk #3 female $16 DATA EAST Sea Speller (R) 39 Sailing Simulation (O)S19 Nami) on $4 Panasonic 1080 GREAT 
‘ARTWORK PX Commando(0) $23. GAMESTAR tane NAM (0) $25 “100 cps. printer DEAL 
Baker St. Detective(0)$7 Karate Champ(O)_. $23. Champ. Basketball(O) $23 Bob's Term64(0)....s29 praniasi@iOl..- $28. Sakata 13” Color 
Hole In One Golt(O)..$7 Kung FuMaster(0). $23 Star Rank Boxing(O) $19 Bob's Tem 128. $49 Quastan®al©) $28. Composite Monitor 
Hotel Alien 0) $7 DATASOFT HAYDEN pas Question O} = $28 forces $139 
Pro Boxing (0) $7 Conan(D) 39 HES Central Point: Shardol Spring (0) eed CPS Commodore direct 
AVALON HILL Dig Oug (0) $9 Microsott Multiplan (0)$19 ‘Copy 210) USAAF ON connect dot matrix 
Mission Never Ending Story (0) $19 Snapshot 64 (R) Wisard'sCrown (0). sae WicoBatHandle, ...$17 
Thunderhead (D)..$16 Ping Pong (0) $19 Project Space Superbase 64 (0) SOFTSYNC WicoBlackMax $9 
Super Bow! DAVIDSON Station (0) $19 Superbase 128 Desk Manager Wice Boat $12 
Sunday (0) $21 Math Blaster(0) HI-TECH EXPRESSIONS Superscript 64 (0) 4 01 12810) 325 
SBS 1984 Team Disk.$14 Speed Reader 2(0) Card Ware iD) Superscript 128 Mode! Diet (0) 319 pein 
SBS 1985 Team Disk Call Spell t(O) Heart Ware (D) ORIGIN Personal SAM-SPM 
SBS Champs Disk. $14 Word Attack) Party Ware (0) Ultima 3,0) ase 1OAM.SPM 


$43 
$33 


sonal & Company checks allow 3 weeks clearance. NO C.0.0.’s! Shipping: Continental U.S.A.—Orders under $100 add $3: free shipping on orders over $100. AK, Hl, 
FPO, APO—add $5 on all orders. Canada & Puerto Rico—add $10 on all orders. Sorry. no other international orders accepted! PA residents add 6% sales tax on the 
total amount of ordar including shipping charges! Prices subject to change without notice. REASONS FOR CALLING CUSTOMER SERVICE — 412.361.5291 (1) Status of 
order or back order (2) If any merchandise purchased within 60 days from S.D. of A. is defective, please call for a return authorization number. Detective merchandise 
will be replaced with the same merchandise only! NO CREDITS! After 60 days please refer to the manufacturers warranty included with the merchandise & return 
directly to the manufacturer Customer service will not accept collect calls or calls on S.0. of A.'s 8008 order lines! 





vou “ASIDE 


Your computer can talk in your own voice. Not 
a synthesizer but a true digitizer that records your natural 
voice quality—and in any language or accent. Words and 
phrases can be expanded without limit from disk. Speech 
Editor program alters or improves sounds. 


And it will understand what you say. A real word 
recognizer for groups of 32 words or phrases with unlim- 
ited expansion from disk memory, Playback and word 
recognition can work togethers Have a two way conversa- 
tion with your computer! 


Easy for the beginner programmer with new 
BASIC commands. Machine language programs and 
memory locations for the more experienced software 
author, 


BRAND NEW FROM CSM!! 


SNAPSHOT 64 ENHANCEMENT DISK 
A must for every SNAPSHOT 64 owner! 

SNAPSHOT 64 owners, you know it's the best backup cartridge available. We 
thought the best would be good enough, but you wanted more. Now the SNAPSHOT 
64 ENHANCEMENT DISK gives it to youl The most requested utilities and aids 
are included in this affordable, easy-to-use package. Look at what you get: 
FAST LOADER - Add CSM's own fast loader to your SNAPSHOT 64 backups. 
Loads your backups several times faster! Works with 1541, 1871 and "1541-clone"* 
drives. 
CARTRIDGE MAKER - All the software you need to install your SNAPSHOT’ed 
program on a bank-switch cartridge board. Downloads and runs in seconds! Perfect 
for business programs or your most-used utilities! All the EPROM supplies you'll 
need are available separately from CSM. 
UPDATED BOOT - Allows SNAPSHOT 64 to handle many new (and some old) 
programs! Automatically included in the’ FAST LOAD and CARTRIDGE MAKER 
options or can be used separately, No need to re-SNAPSHOT your originals! 
INVESTIGATIVE UTILITIES - For the "hacker" type. If you're using SNAPSHOT 
64 to explore program protection or operation, you need these aids, Uncompress. 
the main files so you can investigate and modify them. Then recompress the new 
versions and they'll be booted as usual. 
COMPREHENSIVE MANUAL - Covors the ENHANCEMENT DISK utilities plus 
{ull information on the various SNAPSHOT files. 


All this for only $14.00 plus shipping 


SNAPSHOT 64 


The original cartridge! Takes a "snapshot" of your original program, saves it to 
disk and adds an autoboot. Your program can be interrupted at almost any point 
and restarted at the exact same point! The fastest, easiest-to-use and most effec- 
tive utility of its kind! Backups do not require the cartridge to run, and are com- 
patible with most fast load cartridges (or see ENHANCEMENT DISK above). 


$49.95 plus shipping 


1541 DISK DRIVE ALIGNMENT PROGRAM 
VERSION 2.0 


Still the best! No special tools or knowledge required, just average mechanical 
ability. See the review in the Oct, 1984 Compute's Gazette and all the other top 
magazines. 


Still only $44.95 plus shipping 





Exciting Music Bonus lets you hum or whistle to 
write and perform, Notes literally scroll by as you hum! 
Your composition can be edited, saved, and printed out. 
You don't have to know one note from another in order to 
write and compose! 


Based upon new technologies invented by COVOX. One low price buys you the complete 
system—even a voice controlled black-jack game! In addition, you will receive periodic 
information about speech technology, applications, new products, up-dates, and user 
Contributions. You will never find a better value for your computer. 


ONLY $89.95 inciuses ait hardware and sofware 


Available from your dealer or by mail. When ordering by mail add $4.00 shipping 
and handling ($10.00 foreign, $6.00 Canada), 


The Voice Master is a ible for the Commodore 64, 128, Apple llc, Ile, Il+, and 
Atari 800, 800XL, 130XE. Specify model when ordering. (Apple Il+ owners must 
have joystick adapter and 64K. Available from Covox at only $9.95.) 


EPROM PROGRAMMERS HANDBOOK 
‘A must if you're programming EPROMs! Covers the important concepts in a 
readable style, The accompanying diskette includes many usoful utilities. Put up 
to 10 programs on a single cartridge, with a menu added automatically! Modify 
the KERNAL and DOS ROMs! Much more! 


Book plus diskette for only $32.95 plus shipping 





THE SOURCE GENERATOR 


A SYMBOLIC DISASSEMBLER that turns ML into assembly language, complete 
with labels, Choice of PAL, CBM or MAE formats. Disassemble 6502, 6511 (MSD), 
65C02 or undocumented opcodes. Fast and easy to use. 


$34.95 plus shipping 


PROGRAM PROTECTION MANUAL, 
VOLUMES | & II 


Vol. 1s for the beginner and covers bad blocks, disk directories and BASIC. Volume 
is more advanced - over 265 pages on encryption, GCR code, nonstandard for- 
mats, advanced cartridges and much, much more! 


Vol. 1- $29.95, Vol. I1- $34.95 
Disk included with each. 


Apple lle and Il+ owners: Enhance speech quality and music capabilities with 
optional Sound Master hardware card. Installs in slot 4 or 5. Available separately 
for $39.95 with demo software, or order with Voice Master for only $119.95 (saves 
$10 when ordered together) 


55 DEMO SPEECH DISK AVAILABLE New! An introduction to 

(TALKING — Covox speech. The $5 disk gives several general vocabulaies that you 

an use in any of your own programs. Sample programs include atalking 

keyboard, calculator, clock, and more. English, French and German 

selections. Samples of level 1 and 2 speech editing. 28 page booklet 

included, Price is $5 including postage ($7 outside North America) 
Check, money order, or cash only, SPECIFY COMPUTER BRAND. 


For telephone demo, additional information, or prompt service for credit card orders 
(except $5 talking disk), 


G=5 CALL (503) 342-1271 


Call or write today for complete product information. 








CARTRIDGE BACKER II 


New auto-parameter system archives more programs than ever. Backs up car- 
tridge to disk and adds autoboot, Backups run from disk - NO special hardware 
required. 


$54.95 plus shipping. 
Update for prior purchaser only $14.00 


CSM Software, Inc. 


P.O. Box 563, Crown Point, IN 46307 
(219) 663-4335 
VISA AND MASTERCARD ACCEPTED 


(503) 342-1271 


5 
COVOX INC. 
675-D Conger Street, Eugene, OR 97402 
Telex 706017 (AV ALARM UD) 








DEALER INQUIRIES INVITED. 


Increase your knowledge about all aspects of computers 


An absolutely no-risk guarantee. 


Select 3 Books for only $1 each 


and get 2 


More programs, projects, and ways to use your micro. 





Free Gifts! 


Keep well-informed about the latest books available—and get the original 
publisher’s edition at a discount of up to 65% off the publisher’s price! 
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1993 $21.95 


SERIOUS 


PROGRAMMING IN 


ocoMPuTE! 
MIGRERFAGING 








1983 $24.05 1052 $21.95 


1986 THE COMPUTER BOOK CLUB® , Biue Ridge Summit, PA 17214 


ve99 $24.95 





PROGRAMMING 
TECHNIQUES: 


1737. The FORTRAN Cookbook—2nd 


GAMES 
‘& GRAPHICS: y, 


1062. The A to Z Book of Computer 





Games $14.95 Edition $18.95 
1276P. Computer Graphics—with 29 1588P, Getting Started In Pascal 
ready-to-run programs Papor $10.25 Programming Papor $13.95 
1923. Commodore 64™ Advanced Game 1990. True BASIC—Programs and 
Design $15.95 Subroutin $24.95 





1951P. 101 Programming Surprises & 
Tricks For Your C-64™ Papor $11.95 HARDWARE. 

eS & PERIPHERALS, 
GENERAL 
INTEREST 





1015P. A Beginner's Guide to Computers 
& Microprocessors—with projects. 





2688. The Illustrated Dictionary of Paper $9.25 
Microcomputers—2nd Edition $24.95, 1049, 6-Bi and 16: Mcroprocessor 
TM kbook . 
1874. Unix™ and Xenix* Demystified 
oh ihe a oats per 1729, Making Music With 
1746, Going On-Line With Your Micro Microprocessors $16.95 
$17.95 (Publishers Prices Shown) 


Membership Benefits « Big Savings. Save up to 75% on books sure 
to lncrease your computer know-how, « Ironclad No-Risk Guarantee. If not satis- 
fied with your books, return them within 10 days without obligation! * Club News 
Bulletins, All about current selections—mains, alternates, extras—plus bonus 
offers and sales. Comes 13 times a year with hundreds of titles to choose 
from. * Automatic Order. Do nothing, and the Main Selection will be shipped 
automatically! But... . ifyou want an Alternate Selection, or no books at all, we'll 
follow the instructions you give on the reply form provided with every News Bulle- 
tin, » Bonus Books. Immediately got Dividend Certificates with every book pur- 
chased and qualify for big discounts of 60% to 80%. « Exceptional Quality. All 
books are quality publisher's editions offering the most authoritative information 
on the latest hardware and software applications, 


FREE when you join! 
1001 Things To Do With Your 

Commodore 64—The Commodore 64 edition 

of our bestselling computer programming 
‘guide evor! Provides hundreds of practical and 
Just-for-fun programs and routines! 


A $10.95 Value 


Plus 


BASIC Statements, Commands, and 
Functlons—an indispensable pockot guide 
for every BASIC programmer 








Tha Gomputar BooN Glut" 


P.O. Box 80, Blue Ridge Summit, PA 17214 





= 

Please accept my membership in The Computer Book Club® and send the 3 
volumes circled below, plus, my FREE copies of 1001 Things To Do With Your 
Commodore 64 (1836P) and BASIC Statements, Commands, and Functions, bill- 
ing me $1.00 each, plus shipping and handling charges. If not satisfied, |’ may 
return the books within ten days without obligation and have my membership can- 
celed. | agree to purchase 4 or more books at regular Club prices (plus ship- 
ping/handiing) during the next 12 months, and may rasign any time thereafter, 

1015P 1062 1241P 1276P 1501 1588P 1643 1688 1709 1729 1797 1746 














Valid for new members only. Foreign applicants will receive special ordering instructions. Canada 
‘must remit in U.S. currency. This order subject to acceptance by The Computer Book Club® 
CG-1086 


CAD/CAM 1852 1874 1876 1883P 1889 1899 1923 1936P 1951P 1961 1969 : 
Paul eeeurds 1970 1983 1980 1909 1997 2640 2850 2600 2705 2711 2702 orn 
Name : 
Address : 
City : 
State Zip Phone s 
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DISKS 40¢ 


@ LIFETIME WARRANTY 
@) TYVEK SLEEVES * LABELS 
WRITE PROTECTS * PACKAGED 


FACTORY NEW QUALITY 


099 100up 


Generic SSIDD .55 .40 


(~ new LOW pnices 








HAYES SMART COM 
COMPATI 


*BB°° 





GIVES YOU A CREATIVE EOGE 
NEW 
LOW PRICE 
ESRI CALL! 


M.C.S. 


MicroComputer Services 


800-433-7756 
In Michigan [313] 427-0251 
INFO & CUSTOMER SERVICE — (313) 427-0267 
HOURS: MON - SAT 10:00 A.M. - 6:00 P.M. 
12864 Farmington, Livonia, Ml 48150 





PANASONIC 1080 $199.95 e 
PANASONIC 1091 $229.95 





Canon PJ-1080A | 


COLOR INK JET 


$249% 


LIMITED TIME OFFER 
& GoldStar 
13" COLOR MONITOR 
| +1199 
NEW 


with 
cables 


wia.ssuecrrecocn A © 


REAR TRACTOR/FRICTION jw 
5K BUFFER 


SEIKOSHA SP-1000VC 


COMMODORE READY 





COMMODORE READY 
FROM E 
50 CPS" TRACTOR FEED 





$79°° 


(ccommodore 


EDUCATOR 


We Bought 
‘em All 
FAR BELOW 
DEALER COST 


RETAIL 
499,95 


REGULAR —= 
DEALER EE 
325,00 ry 

* 100% C-64 Compatible 

* Built in Hi-Res Green Monitor 

* Heavy duty power supply and 
sturdy case 

* All units completely refurbished 
with full 90 day warranty 


$199.95 
DEALER PRICING AVAILABLE 


MC/VISA/C.0.D. 

Invited 
Al pric ‘or chock, add 3% 
for 


otice, ALL MERCHANDISE CARRIES 
MANUFACTURERS WARRANTY 



















You know the routine by now: you buy 
expensive nibbler and next month it's 
obsolete. How many times is your wallet 
going to be nibbled? 


Kracker ax is NOT a nibbler. It is a param: 
eter copy system. Most volumes contain 
well over 100 separate copy parameters, 
What IS a parameter? Just a custom pro 
gram that allows your 1541 or 1571 disk 
drive to strip all, and we mean ALL. copy 
protection {rom your expensive software, 
leaving you with UNPROTECTED, TOTALLY 
BROKEN back-ups that can be copied with 
‘even a simple fast copier. 


This system has many advantages over the 
‘older nibbler type of utilities. For one thing 
you don’t nave to experiment. Each 
parameter WILL back-up the title it was cre: 
ated for. Period 


For another, a backup created with 
Kracker Jax will NEVER rattle your disk 
drive head, And that means less disk drive 
alignment problems for you. 








ARE YOU CAUGHT UP IN THE 
COPY PROTECTION ARMS RACE? 


DEFEND YOURSELF WITH KRACKER JAX 
A REVOLUTION IN ARCHIVAL SOFTWARE! 








KRACKER JAX 


PROTECTION BUSTERS 


BLAST 
DISK 
PROTECTION 


ALL NEW: VOLUME THREE 
‘Volumes One & Two still available! 
Dealer Inquiries Invited 
ONLY $19.95 COMPLETE! 
No shipping or handling charges! 
(C.0.D. please add $3.00) 


Phone orders welcome: 206-695-1005 
SAME DAY SHIPPING! 


CHECKS, MONEY ORDERS OR VISA/MASTERCARD ACCEPTED. 
Mail your order to: Computer Mart, Dept. G 
2700 NE Andresen Road / Vancouver, WA 98661 








Check out some of the: 
exclusive feature 
F Jax |s the BEST program of its 












Jax will back up titles that the 

s CANT! 

requires NO special 
! 





‘tection in a matter 





‘of SECONDS! 
cae priced RIGHT—|ust 
1 gus It UNPROTECTED easy to 


ie _dax updates are. avallable 
* QUARTERLY! 

Remember, the minute a new program is 
released, the Kracker Jax team will be 
developing a new parameter for it. This 
ns that future Kracker Jax disks will 
always contain parameters for the hottest 
new titles on the market! Kracker Jax is 
the system that cannot fall behind the 
times! 


In the copy protection arms ra 
Jax Is the ultim: 











, Kracker 

















THE LOWEST 
PRICES 


THE BEST 
SERVICE 


ELECTRONIC ONE* 


PHONE 
LINES 
OPEN 


10-6 E.S.T. 
MF 


CALL (614) 864-9994 © P.O. Box 13428 ¢ COLUMBUS. OHIO 43213 


C64 COMPUTER 
64C COMPUTER 
1541 DISK DRIVE 
1571 DISK DRIVE 
1702 MONITOR 
1902A RGB MONITOR 
MPS 1000 PRINTER, 
1350 MOUSE 


PRINTERS. 
STARNX10. 

‘STAR POWERTYPE 
EPSON LxB0 
PANASONIC 1080 
PANASONIC 1091 
'SEIKOSHA SP 1000VC 
COMREX 
PANASONIC 3131 
STARSGI5 
STARSD10 
STARSD-15 
STARSA-10 
STARSR-15 


MISC. HARDWARE 

GWIZ INTERFACE 

CARDCO G INTERFACE 

TYMAC INTERFACE 

PPLINTERFACE 

XETECUR. 

XETEC SA. (8k BUF) 

MICRO R&D INTERFACE 

STAR INTERFACE — 29.99 
MODEMS 

MESSENGER 99.99 

TOTAL TELECOMMUNICATION 29,99 

COMM. 1200 BAUD MODEM . .. 149.99 


MORE... 
CARTRIDGE PORT CONVERTER17.99 
128k RAM UPGRADE FOR 128 114.99 
XLBO 80 COLUMNS BOARD ._. 34.99, 
X10 COMPUTER INTERFACE 
CABLE, SOFTWARE FOR 
CONTROLLING LIGHTS 
BSR SYSTEM X10 29.99 
LAMP, APPLIANCE MODULE. 14.990a, 
CARDCO CASS. RECORDER . . 24.99 
MONITORS 
14" THOMPSON COLOR, 129.99 
13" SAKATA COLOR 139.99 
13" GOLOSTAR COLOR 129.99 
14" HITACHI COLOR . . 169.99 
14" COMM. 1702 ceeee 178.99 
14" TEKNIKA COLOR 149.99 
12" MAGNOVIX AMBER, 79.99 


commodore 


SOFTWARE 

KARATEKA 

MUSIC SHOP 

PRINT SHOP. 

PRINT SHOP. 
COMPANION 

PRINT SHOP LIB. 

ACRO JET. 

FAS 

SILENT SERVICE 

KENNEDY APPROACH 

LEADER BOARD 

BARD STALE 

CARRIER AT WAR 

EUROPE ABLAZA 

HEART OF AFRICA 

MOVIE MAKER, 

SKY FOX 

PINBALL SET 

RACING SET 

‘SUPER BOWL SUNDAY 

BALLYHOO 

HITCH HIKER, 

SPELL BREAKER 

ALTEREGO 

COUNTDOWN: 

ROAD RACE 

GAME MAKER, 

HACKER 

COMPUTER PEOPLE 

‘SPACE SHUTTLE 

SUBLOGIC FOOTBALL 

BOB & WRESTLE 

INFILTRATOR 

DAM BUSTERS 

FLIGHT NIGHT 

HARD BALL 

FLIGHT SIM. I 

JET 

MICRO LEAG. BASEBALL 

‘STAR BASEBALL 

‘STAR FOOTBALL 


PRICES 


WE CARRY SOFTWARE 

FOR ATARI 2600-7800 

8 BIT & ATARI ST.... 
INTELLIVISION — TEXAS INSTRUMENTS 





HOW TO ORDER: CASHIER CHECK, MONEY ORDER, MASTERCARD’ OR VISA* (ADD 4% FOR CHARGE CARDS) 
‘ALL PRICES SUBJECT TO CHANGE WITHOUT NOTICE. 
‘SHIPPING: ADD $3.00 ON ALL ORDERS UNDER $100.00 


UPS. . 


PLEASE SPECIFY 


UTILITY 
SOFTWARE 

PAPER BACK FILER 128 

PAPER BACK FILER 64 

PAPER BACK PLANNER 128 

PAPER BACK PLANNER 64 

PAPER BACK WAITER 128 

PAPER BACK WRITER 64 

SUPERBASE 128 

SUPERBASE 64 

SUPERSCRIPT 128 

SUPERSCRIPT 64 

DATA MANAGER 128 

‘SWIFT CALL 128 

WORD WRITER 128 

CONSULTANT 

PAPERCUP. 

PAPERCLIPISPELL 

NEWSROOM 

FAST LOAD 

MULTIPLAN 128 

PROG. TOOL KIT 

MACH 5 

MACH 128. 

MICRO FILER 

SYN CALC 

HOME PAK 

PRINT MASTER 

JANE. 

INTRACOURSE 

BASIC 128 

MUSIC STUDIO 

SUPER PASCAL 


ELECTRONIC ONE 


CLOSEOUT 
SOFTWARE 
BREAKDANCE iy 
ALF COLOR CAVES ..-- 
TURTLE TOYLAND 
STORY MACHINE 
COSMIC LIFE 
JUKE BOX 
DELTA DRAWING 
FACE MAKER 
UP FOR GRABS 
GHOSTBUSTERS: 
SAMMY LIGHTFOOT 
MISSING LINKS 
‘THE FACTORY 
‘SPARE CHANGE 
MUTANT CAMELS 
LEARNING LEEPER 
WIZARD PRINCESS 
JAWBREAKER: 
BEAM RIDER 
TYPE ATTACK 
SPACE RESCUE 
JUNO FIRST 
MR. ROBOT 
BCQUEST 
GORTEC (CASS) 
(DANCE FANTASY. 
LOGIC LEVELS 
SEA HORSE 
WORD GAME. 
TRAINS 
AEROBICS 
GYRUSS 
GENESIS 


CALL (614) 864-9994 OR WRITE 
P.O. BOX 13428 COLUMBUS, OHIO 43213 





AMIGA SOFTWARE 
CALL FOR CATALOG 





DUST COVERS 





STARSG 10 

STAR NX 10 
PROWRITER 

xeo 

STAR POWERTYPE 


‘COMM. 803 
‘COMM. 801 

‘COMM. MPS 1000 
‘COMM. 1526/802 
PANASONIC 1091 








DISKETTES 
SONY 5%" S/S D/D 

BASF 5%" S/S D/D 
PERCISION 5¥." S/S D/D 
BONUS 5%" D/S D/O 
CENTECK COLOR S/S D/D 
NASHUA 3¥2" S/D_ 
VERBATIM 3¥2" S/D 

DISK NOTCHER 

FLIP & FILE (50) 


JOYSTICKS 
ATARI 

THE BOSS 

THE BAT 

SWAY 

KRAFT 

SPECTRO VIDEO 1 
SPECTRO VIDEO2 
PADDLES 





NO RETURNS UNLESS DEFECTIVE. ALL DEFECTIVES WILL BE EXCHANGED 


NO PERSONAL CHECKS 


NOC.0.0’S... SHIPPED 


‘ADD $5.00 ON ALL ORDERS OVER $100.00, ACTUAL FREIGHT CHARGED ON MULTIPLE ORDERS. 
INTERNATIONAL: ACTUAL FREIGHT CHARGED ON ALL ORDERS OUTSIDE THE CONTINENTAL UNITED STATES INCLUDING A.P.O. 
POLICIES: NO RETURNS WITHOUT A RETURN AUTHORIZATION . 


NO EXCEPTIONS. 


CALL OR WRITE FOR FREE CATALOG 


CALL ELECTRONIC ONE (614) 864-9994 P.O. BOX 13428 COLUMBUS, OHIO 43213 








APROSPAND-64™ Gives your Commodore 64 or 128 {ull ex: 


pandability! This superbly designed expansion module plugs into the expan- 
sion port & gives you 4 switchable (singly or in any combination) expansion 
connectors - plus fuse protection - plus a reset button! Before you buy an 
expander, be sure that it has a fuse to protect your computer and that you 
can activate your cartridges in ANY combination allowed by the cartridges. 


NOW ONLY $29. 95 


Commodore Interfaces and Cables 
Cardprint G-WIZ Printer Interface #1108. 
Cardprint B/PS (without Graphics) #1105 
Amiga Printer Cable (6 ft) #3040-6MF... 
Amiga Printer Cable (10 ft) #3040-1OMF. 
Commodore 6 Pin Serial Cable (5 ft) #3006-5MM...$ 6.95 
Commodore 6 Pin Serial Cable (8 ft) #3006-8MM...$ 8.95 


‘Add Shipping Per item: $3.00 Cont. U.S. $6.00 CAN, PR,HI, AK, APO, UPS Bive 
APROTEK Daisy 1120, 20 CPS Daisy Wheel. 
Elite 5CD, 10 CPS Daisy, Commodore.... 


Fy 2 SEIKOSHA SP-1000VC.....$169.95!! 


‘Add Shipping Por Item: $10.00 Cont, U.S. $22.00 CAN, PR. HI, AK, APO, UPS Blue 


——_—_— 
TECHNICAL INFORMATION (805) 987-2454 caur. 
CALL TOLL FREE TO ORDER: (800) 962-5800 US 


Dept CG (CA Res. Ado 6% Tax. sted ae 


= APROKK ‘cath prees, VS & MC Add 3% 
1071-A Avenida Acaso, Camarillo, CA 93010 
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FACTORY AUTHORIZED 
COMMODORE REPAIR CENTER 


1-800-772-7289 
IN ILLINOIS (312) 879-2888 





C64 Repalr wom . 42.95" AMIGA Repair .... CALL 
1541 Repair ..... 79.95" C64 Power Supply . 34.95 
1541 Alignment 

only . 29.95" CBM & AMIGA PARTS 
C128 Repalr wen. 79.95" Call (312) 879-2350 


*Includes parts, labor & UPS return shipping. APO/FPO or 
Air Freight add $10.00 


CALL BEFORE SHIPPING, VISA, MASTERCARD OR MONEY ORDER 
24-48 Hrs, Turnaround (Subject to parts availability) 
Diagnosis fee of $25.00 for any unit altered or with no defects. 


SAVE YOURSELF SOME MONEY 


Due to our vast experience in repairing 64s we have found that 
the power supply is a major cause of board failures. By inserting 
‘our device between the power supply and computer over 63% 
of our customer's repairs would have been avoided. For only 
$19.95 our C64 Over Voltage Sensor will continuously monitor 
your power supply output. If an overvoltage occurs the Over 
Voltage Sensor will prevent damage to your 64. 


64 OVER VOLTAGE SENSOR $19.95 


TEKTONICS PLUS, INC. 
150 HOUSTON STREET 
BATAVIA, IL 60510 


CLIP AND SAVE 



































Commodore 64 Only 


SOFTWARE $4/Disk 


‘The Best Public Domain Software from 64 Gold 

G Printed Directory of all 102 disks ........ $2: 

Games, utilities, and more software 

G Fivo disk sampler with directory 

Best Games from England 

1D #102 Software Pirates, Triads, Brickbuster, 
st : ‘Arena sere 


Music of the Mi 





- $19.95 composers. 





ar 

Starwars, Startrek, Elza, Easy Dungeon, 

Planet Probe, Deep Space 

‘Adam Handball, Grade Book, Math, Typing Tutor 

0 #79 Education, games, utiities are) 

‘Communications, BBS lister, disk doctor 

1 #94°95 Best utiities (2 disks) 

Directory Sort and function yas recover fos 
#80 Cockroach 


Volume Il - 


eeeee 


1 #68 Fast copy minutes) 


BULK DISKS 55¢ EACH 


C128" in 128 mode. 


‘© Lifetime replacement guarantee 
‘© Witte protect tabs © Hub rings and Tyvec envelopes 








‘Add $4 shipping & handling per order. Each additonal 100 only - $19.95 


‘isks add $3, CA residents add 6.5% sales tax 

‘Amount enclosed $C) Check [3 VISA C3 MasterCard 
Card No. 
‘Signatua_____Exp, ate 
he 


Name 


Address 





Datatiler 128 - 








money order to: 





Gty__state__Zip 
Call toll free 800-431-6249 In Calif, 415-550-0512 


BLACKSHIP 


COMPUTER SUPPLY crot 
P.O. Box 883362 San Francisco, CA 94188 











Gree Spirit Software, Inc. 


rs ~ Classical music for 
the C64* or C128" in 64 mode, Approx. 1 
hour of music per disk with comments on the 


Volume |- Mozart's Rondo Alla Turca, Beeth- 
coven's Sonata Pathetique and 20 other works 
by Bach, Handel & many others. 
Beethoven's Minuet in G, Bach's 
Invention No. 4, and 40 other works by 
Brahms, Schubert, Chopin & others, 
Volume Ill - Mostly Mozart. 
Figaro, Sonata Facile, Minuet from Don Gio- 
vanni and many other Mozart compositions. 
$9.95 per volume. All 3 volumes - $24.95 


The Great War - WWI strategy game for the 
Includes one or two 
Armies of 17 countries. 


Foolish to pay more. player options. 
Dangerous to pay less. Weather, terrain, lines of supply, etc, affect 
‘© Quaity moda the outcome, C128" disk only - $29.95 


BASICally SIMPLE 128 - 


Cunt Seco C128" Basic 7.0 commands, functions and 
5.25" DSDD 69 65 operators in Basic programs. 


BASICally SIMPLE 64 - How to use all C64" 
Basic 2,0 commands, functions and operators 
in Basic programs, Disk - $14.95 

Database program for the 
C126" in 128 mode. Disk - 


FREE SHIPPING & HANDLING. 
residents add 7% sales tax, Send check or 


Free Spirit Software, Inc. 
538 S. Edgewood 
LaGrange, IL 60525 


es ‘of Commodore Electronics, Ltd. 


100% ERROR FREE 
EES 


P | From Leading Magnotics Mir. 
LIFETIME WARRANTY 
a, With Hub Rings, Write Protect Tabs, 


‘Tyvec Envelopes, User 1D Labels -In 
Factory/Sealed Poly Packs 





(YOU GET EVERYTHING BUT THE BOX) 
PRICES ARE PER DISK 


Overture from (50 Minimum) 





Bi" 312" 


'SSOD | OSDD | DSHO96TPI SS os 
Ear far] 130] fiaa[00} 


Tas 


COMMODORE MPS 801- Black . 

Brown, Blue. 
COMMODORE MPS 603 - Black . 
COMMODORE 1526- Black . 
OKIDATA 80/82/92/93 - Black . z 

Blue, Green, Red, Brown, Purple . . . 
Sold 6/Box (Minimum) 





How to use all 





C128" disk 





IN STOCK ITEMS SHIPPED IN 24 HOURS 


Min, Order $25.00. S8H: Continental USA; $4,00/1000r fe 
disks. discount at 900, lbtons $.25 each, Forign on 

FPO, pease cal Ml residonts ada 4M tax Prices subjo 
{o change without notice, Hours 830 ANt-6.00 PM 


Sie) = 


Precision Data Products 
P.O, Box 8367, Grand Rapids, MI 49518 
Michigan 1-800-632-2468 










$24.95 








Mlinois 








CoO.D. 
























all 





eel 















Classified 


SOFTWARE 


FREE SOFTWARE for C64, C128, IBM, & CPM 
For info send large stamped (39¢) return 
envelope to: PUBLIC DOMAIN USERS GROUP, 
PO Box 1442-A2, Orange Park, FL 32067 


FREE MEMBERSHIP IN SOFTWARE CLUB. 
Top British C64 programs. Catalog and 
reviews (no strings). ARROW EXPRESS, 
Box 205 G8, Rossland, BC VOG 1Y0 


VIDEO TITLE MAKER and colorful, eye- 
catching in-store business advertising 
messages and special effects generator 
$24.95 (C64 Disk): MicroAds, 145 East 
Norman Dr,, Palatin, IL 60067 


$$ WIN WITH THOROUGHBRED HARNESS & 
Greyhound handicapping software...$29.95, 
enhanced.,$49.95, For most computers. 

Free info. Software Exchange, Box 5382 CG, 

W, Bloomfield, MI 48033, Call: (313) 626-7208 


ARB BULLETIN BOARD FOR THE 64 & 128 
300-1200 Baud, Punter/Xmodem/ ASCII, 

Vote, War Room, Quiz, 27 SIGS, Passwords, 
E-Mail, Dating Board & More! $64.95 

(BBS) 718-645-1979 * (Voice) 718-336-2343 

L&S Computers, P.O. Box 392, Bklyn, NY 11229 


PRIME. In yours? Neuro-Numerological fun 
Predictions/Profiles/Mates & More... 

$25 for C64 disk (Ont.+7%) to: oTHERLOBE, 
374 Delaware Ave., Toronto, Ont. M6H2T8 





Math Quizzer: Percents, Percents to Dec. 
Division, Multiplication, Add, Subtract. 
Send $12 Cash or Check to: Chris Yager, 
P.O. Box 20611, Portland, OR 97220 


***WE HAVE THE LOWEST RENTAL PRICE: 
Guaranteed, Call or write for more info, 
Pioneer Rental, P.O, Box 54, 945 Dartmouth 
Ave., Lovelock, NV 89419 (702) 273-2781 


64/128 Super Disk Librarian (400 disks 

or 6000 filenames), Gradebook64, Statpak64, 
Prolog64, $19.95 each, Execusoft, D, Tucker, 
Buda, Illinois 61314 


64/128 MAILING LISTS & SOFTWARE! Ideal 
for small dealers /users, Best programs & 

lowest prices ever! FREE OFFERS: CCS-CG, 
3119 Isabel Drive, Los Angeles, CA 90065 


PRINTSHOP™ OWNERS, New C64 Assorted 
Graphics disks. Each disk only $9.00 
Shipping included. Write to: Cutts Bros, 

106 Timber Lane, Morehead, KY 40351 


FUN WHEEL, ANIMATED GAME SHOW. 
€64/128, Spin the wheel or solve puzzle. 
Numerous categories, 1 or 2 player. With editor 
to make thousands more puzzles, Disk only $10. 
Send to: Data Heaven, 6118 S, Briar Bayou, 
Houston, TX 77072 


DELIGHTFUL GRAPHICS DISK FOR AGES 
2-6, Color & Count. C64. Order now for Xmas! 
Only $12. Send CH/MO to: M. E. Wilson, P.O. 
Box 4249, Clearwater, FL 33518 


VIC-20 & C64 GAMES, ED. PRGS, 
CARTRIDGES, tapes, disks, etc, Below dealer 
cost! Selection! Send $1 for list: Commodore 
Basics, 3362 S, 2300 E., SLC, UT 84109 


WIN AT VIDEO POKER! Realistic simulation 

of casino video poker. Unique option allows 

you to determine the best discard strategy. 

Do you split Aces for a four-flush? Put 
probability on your side! Send $29.95 to: 
GERHARDT SOFTWARE, 32600 CONCORD, 
Dept. #401, MADISON HTS, MICHIGAN 48071 
































DFC-DISKETTE FILE COPY, version 4.0 
Convenient File utility for C64, 

No copy protect. Now with support for 
SFD 1001, 8250, & 1571, Still supports 
1541, 4040, 2031, & 8050, (Not for 
protected disks.) Ideal for IEEE 488 & 
other interfaces. Put the files you want 

on the diskettes you want, $12.95, 

Or get a demo disk with four uses per copy, 
$4.95, California orders must add sales tax. 
No credit cards or COD. Prices include 
postage in Continental U.S, 

Layton Berry Software, (415) 284-7255, 
573 Merriewood Dr., Lafayette, CA 94549 


C-64 FINEST PUBLIC DOMAIN PROGRAMS. 


*On Disk* most $1.50 *On Disk* free list 
You pick the programs you want! 


JLH Co., Dept. G, Box 67021, Topeka, KS 66607 


CUSTOM CARTRIDGES FOR C64/128 
Have your BASIC or ML. program installed 
in a convenient cartridge. $35 each, Write 


The Rom Shop, 8593 E. 16 Mile, Paris, MI 49338 


DARKSTAR BBS V3.0 $49.95 US 
Multi Baud, Multi-Transter, Multi Orie. Color Gaphies or 
ASCII Modes. Bulletins & Sub-Bulletns. All Machine Language 
with ISEQ File Management for Lightning Speed" 
Message Categories. 88S Text, Commands, & Colors are User 
Definable Allowing Customization to Reflect Your Theme!” 
‘Cycle Messages. Add Users, etc. while ON-LINE! 

Dark Term with 28,000 Byte Butfer ALSO INCLUDED!" 
DARKSTAR SYSTEMS SOFTWARE 24h BBS (416) 445.6788 


113 Valleywoods Fi. Unit 95, Don Mills, Ont.. Canada M3A 2R8 


TEXAS DISK RENTAL: Try before you buy! 
Games, utilities & educational. Visa/MC. 
Route 2, Box 90-A, Bonham, TX 75418 

Or call (214) 583-2572 or 583-5856 


REAL PINOCHLE. Double-deck, 4-handed, 
partnership for 1 player. Full graphics, For C64, 
PC, PCjr, On disk $20, Jim Bernard, 301 Forest 
Dr., Bellevue, NE 68005 


Pro CoacH 


A FOOTBALL STRATEGY 
GAI 


ME 
A simple but not simple minded game 
written exclusively for 128'™ users. Match 
wits with the computer or a friend, Experi- 
ence the intensity of a real game as time 
runs out, You call the plays. You take the 
chances, Send check or money order to: 
Omnisoft Associates 
P.O, Box 2294, Orlando, FL 32802 


$19.95 (for cassette version $24.95) 
(Florida residents add 5% sales tax) 








GRADESEASE for teachers. Electronic gradebook 
(C64/128, IBM-PC) Prints gradebook pages & 
Progress Reports. $19.95 + $2 s/h to: 
SOFTWARR, 11919 Barrytree Dr., Houston, TX 
77070 


*C-128* ALPHA FILE - quick, easy, convenient. 
No screen set-up, menu driven, phrase search. 
ALPHA UTILITY - autoboot, sprites, F keys, etc. 
Both on disk only $11.95 ppd, ALPHASOFT, 
489 Willow, Elmhurst, IL 60126 


TURBO PASCAL FILE PROGRAMS FOR CP/M 
MODE Commodore 128. Address /Dental/ 
Medical/Car Maintenance/Credit Card, 2 Disks/ 
Manual (,Com Files) $29.95, Suncare Software, 
3165 Lorman Dr,, Jacksonville, FL 32217 


BLACKJACK - C64; 1-3 players; color graphics; 
features hit, stand, double down, split. 

Disk $7.95. 10 day money back guarantee! 
Blackjack, PO Box 1018, E, Palatka, FL 32031 


C/64/128 TECHNICAL PROGRAMS. LINCAD- 
Linear Circuit Analysis & Design - $49. 

FFT Spectrum Analyzer - $49. Add $3.50 s/h. 
OH res, add 5.5% tax. Sofcad Electronics, Inc. 
P.O. Box 21845, Columbus, OH 43221 


Amiga and C64 Public Domain Software. 
For a list of available programs send a 
self-addressed, stamped envelope to MCA, 
P.O, Box 5533, Katy, TX 77449-15533 


HARDWARE 


ROBOTICS, HOME CONTROL, EXPERIMENTS. 
You need sensors, Temp, press, encoders, etc. 
Send $1.00 for more info to: Overtonics, 1904A 
SW 3ist Ave., Ocala, FL 32674 


MISCELLANEOUS 


REPAIR; C64 (including p/s)-$45, 1541 
(including clean, lube, align)-§50, BUY/SELL: 
Commodore parts or whole units, CONTACT: 
Dave Taylor (915) 683-8398 or Jerry Dees (915) 
561-8483. 5106 Daventry St., Midland, TX 79705 
(parts and labor warranted 30 days) 


Personal Computer Owners CAN EARN $1000 
to $5000 monthly, selling simple services 
performed by their computer, Work at home - in 
spare time, Get free list of 100 best services to 
offer, Write: C.LL.D.L., P.O, Box 60369, 

San Diego, CA 92106-8369 


COMPUTE!’s Gazette Classified is a low-cost way to tell over 275,000 
microcomputer owners about your product or service. 


for boldface words, or $5 





checks payable to COMPUTE! Publications. 


25 per line, minimum of four lines, Any or all of the first line set in capital letters at no charge. Add $15 
0 for the entire ad set in boldface (any num 


of lines.) Inquire about display 


jpayment is required. Check, money order, American Express, Visa, or MasterCard is accepted, Make 


Form: Ads are subject io publishers approval and must be either typed ot legibly printed, One line equals 40 


letters and spaces between words, Pl 


lease underline words to be set in bol 


General Information: Advertisers using post office box numbers in thelr ads must supply permanent address and 
lable issue 


telephone numbers, Orders will not 


Closing: 10th of the third month proceding cover date (e. 


remittance to: Harry Blair, Classified Manager, COM 
place an ad by phone, call Harry Blair at ( 

Notice; COMPUTE! Publ 
‘out misle 








1g OF questionable copy. 





be acknowledged. Ad will appear in next avail 
, June issue closes March 10th). Send order and 

PUTE!'s Gazette, P.O. Box 5406, Greensboro, NC 27403. To 

19) 275-9809 

ications cannot be responsible for offers or claims of advertisers, but will attempt to screen 


after receipt. 
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Commodore 
k SERVICE 


%* Normally 48 Hour Turn-Around. 
* Special PlaChip ... $18.95 
* C64 Repair PCB Only. 38.95 





* 1841 Alignment . 25.00 
* 1541 Repair. 69.95 
Parts Included 


(Power Supply Extra) 
To save C.0.0. charges ~ send unit and 
power supply with check or M.O. to: 
DIGITAL SOLUTIONS INC. 
1122 - Sth St. 
Altoona, PA 16601 
(814) 944-0405 











THAT'S INCREDIBLE! 
ONLY $14.95 EACH 
THE DISK SYSTEM 


1 KEY FORMAT, ERASK-RENAME ANY FILE. 
“RESTORE OLD DISKS TO ‘LIKE NEW’. 
-CREATE YOUR OWN AUTOBOOT DISKS, 
THE FILE CABNET 

“GREAT FOR STORING ANY INFORMATION, 
900 PAGES PER FILE CABNET, 

“10 FILE CABHETS PER DISK, 

SBOTH HAVE A 64 AND 128 VERSION, 
SBOTH ARE FULLY MENU DRIVEN, 

SPRICE INCLUDES SHIPPING AND TAX, 
SHEXT DAY MAILING ON ALL ORDERS. 
CHECK, MONEY ORDER, VI8A,M/7C 


ATIC COMPUTERWARE 
12214-B SAGINAW ST. 
CLIO, MICH, 48420 
1-313-686-2793 





From Origin, creators of the Ultima™ series, 
comes a new dimension i in fantasy role-playing 


THE ORB B OF CELESTIAL HARMONY 


A danger-filled adventure 
through a complex and 
colorful Oriental world of 
magic, mysticism and intrigue. 
By Greg Malone. 


oebius, the 
fabled deity of the 
island kingdom 
of Khantun, has 
chosen you, his 
disciple, to recover 
the stolen Orb from the renegade 
Warlord and prevent the destruc- 
tion of the universe. 

You will journey through the 
ascending planes of Earth, Water, Air and Fire. At each 
level your challenges increase in difficulty, demanding 
greater courage and cunning. All of your martial arts 
skills will be required to survive the ninja-like assassins 
who seek to foil your quest. Sword-wielding rebel 
guards will test your blade every step of the way. And 
watch out for wild beasts that stalk the forests! 

Local villagers can help, but beware—the wrong 
approach will frighten them away, leaving you in a 
world where starvation looms ever-present. Wise use 
of magical charms, prayers and fireballs is essential in 
reaching the final confrontation with the treacherous 
Warlord—where victory brings recovery of the long- 
sought Orb of Celestial Harmony. Good luck! 


Available on Apple” 


(UML 


L/SYSTELIS INE. / 340 HARVEY ROAD, MANCHESTER, NH 03103 (603) 644-3360 


ULTIMA III™ takes you on 
an incredible fantasy role- 
playing journey through 
monster-plagued Sosaria in 


search of the elusive Exodus. 


Ultima is a trademark of Richard Garriott /Moebius is a trademark of Gi 
AutoDuel and Ogre are trademarks of Steve Jackson/Apple is a trademai 


ULTIMA IV™ is the long:, 
awaited sequel to Ultima™ 
Ill. The Quest of the Avatar 
is a quest to the final 
frontier—the self. 


AUTODUEL™ is a futuristic, 
fast-paced strategy role- 
playing game where the 
right of way goes to the 
biggest guns. 


Malone 
of Apple Computer Inc. 


OGRE™ is a strategy game 
fought on the nuclear bat- 
tlefield of tomorrow as an 
inhuman juggernaut Cyber- 
tank battles conventional 
forces. 


Authors wanted. 
Call us today. 























PW 128/64 Diet 
Silva availeble at $14.95 (U.S) 





‘MAIL ORDERS ie 


CRYSTAL COMPUTER INC. 
Ih Michigan W517-2247667 
Outside Michigan 1-800-245.7316 


CANADIAN DEALER ENQUIRIES 


INGRAM CANADA LTD. 
15416:738.1700 


‘Commodore 12 


You wont int soled woh ware — word 

database and spreadsheet appl 

“price. But, you also want th 
all, our Pocket 128; 


With Pocket 128 or 64, you'll find all the features you 
can imagine... and then some. And Packet 128/64 is so 
easy to use, you won't even need the reference guide. 
On-screen and in memory instructions will have you up 
and running in less than 30 minutes, even if you've never 
used a computer before. 






The price? It’s as low as you'd expect for aline of 
software called ‘Pocket’. Suggested Retail Price for the 64 j 
anna software is $39.95 (U.S.) and $49.95 (U.S.) for the 128. 
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Pocket Writer 128 or 64, Pocket Planner 128 or 64 and if 
Pocket Filer 128 or 64... Solutions at sensible prices 
from Digital Solutions Inc. 


International & Distributor enquiries to; 


jephone (416) 731-8775, 





Pocket Writer 128 and 64 are now available in French. 





